СРОЧНОООЧему равно значение переменной s
1. Var s,k: integer;
Begin
s:=1;
for k:=1 to 11 do
s:=s+12;
write(s);
end.
2. Чему равно значение переменной s
Var s,k: integer;
Begin
s := 0;
for k := 14 to 18 do
s := s+8;
writeln(s);
End.3. Чему равно значение переменной s
Var s, k: integer;
Begin
s := 0;
for k := 1 to 3 do
s := s + k; s := s *10;
writeln (s);
end.

4. Чему равно значение переменной у?
y := 1;
i := 1;
While i > 1 do begin
y := y + 1/i;
i := i - 1;
end;

5. Чему равно значение переменной у?
y := 0;
i := 3;
repeat
i := 2*i;
y := y + i;
until i>5;

Ответ:
№1 Ответ: 133
№2 Ответ: 40
№3 Ответ: 60
№4 Ответ: 1
№5 Ответ: 6
Объяснение:
№1 Цикл "s:=s+12;" повторяется благодаря функции "for k:=1 to 11 do" и тем самым к переменной S мы 11 раз прибавляем 12. 1+11*12=133
№2 То же самое, но мы к переменной 5 раз (18-13) прибавляем 8. 8*5=40
№3 К переменной S сперва прибавляем переменную k 3 раза. Переменная k получает номер цикла, то есть в первый раз мы прибавляем 1, потом 2, потом уже 3. В конце программы просто умножаем на 10. S=(1+2+3)*10.
№4 Здесь для совершения цикла необходимо выполнить условие, а именно нужно, чтобы переменная i была больше 1, но из-за того что i у нас изначально равна 1, цикл "y := y + 1/i; i := i - 1;" у нас не выполняется, а значит y=1
№5 В цикле repeat все действия выполняются сразу, но выход из цикла осуществится только при том условии, если i будет больше 5. К концу цикла у нас i будет равен 6, а значит цикл закончится и y будет равен 6 (y:=y+i).