Сколько раз выполнится цикл ? язык паскаль

с обьяснением ответить

a:=12;

нц для i от 3 до 11 шаг

a:=a+8;

кц

5 раз

Объяснение:

переменная i будет изменятся от 3 до 11 с шагом 2

i = 3

i = 5 (3 + 2 = 5)

i = 7 (5 + 2 = 7)

i = 9 (7 + 2 = 9)

i = 11 (9 + 2 = 11)

цикл выполнится 5 раз

а = 12

а = 12 + 8 + 8 + 8 + 8 + 8 = 12 + 8 * 5 = 12 + 40 = 52

ну вот так это будет выглядеть с ветвлением и возможностью повторять вычисления без повторного запуска программы.

var a,b,c,d,z: integer; beginwriteln('введите 1 число'); read(a); writeln('введите 2 число'); read (b); writeln('введите 3 число'); read (c); d: =a+b+c; writeln('сумма чисел ',a,'+',b,'+',c,'=',d); writeln ('хотите ли вы решить еще один пример? 1-да, 0-нет'); read (z); while (z = 1) dobeginwriteln('введите 1 число'); read(a); writeln('введите 2 число'); read (b); writeln('введите 3 число'); read (c); d: =a+b+c; writeln('сумма чисел ',a,'+',b,'+',c,'=',d); writeln ('хотите ли вы решить еще один пример? 1-да, 0-нет'); read (z); end; end. 

var alpha: real;

begin

  read(alpha);

  if alpha > 90 then write("tupougolnyj");

  if alpha = 90 then write("prjamougolnyj");

  if alpha < 90 then write("ostrougolnyj");

end.