Регистрация
123654789e
12.11.2020 20:10
Информатика
Есть ответ 👍

РЕШЕНИЯ ТОЖЕ НУЖНЫ,
1. Определите значение переменной S после выполнения фрагмента программы:
i:=2;
S:=2;
while i < 11 do
begin
i:= i + 3;
S:= S + 2 * i;
end;
2. Запишите значение переменной sum после выполнения фрагмента программы:
sum:=2;
for i:= 2 to 4 do sum:= sum + 3* i;
3. Запишите результат выполнения программы:
var p, n: integer;
begin
p:= 2;
for n:= 10 dowto 9 do p:= p * n;
writeln (p);
end

101
365
Посмотреть ответы 2

Ответы на вопрос:

anelya41
anelya41
4,5(34 оценок)

Объяснение:

1. 50

2. 29

3. 180

ВКГ1
ВКГ1
4,8(28 оценок)

var a,b,S:real;

begin

 writeln('Введите a');

 readln(a);

 writeln('Введите b');

 readln(b);

 S:=0;

 S:=2*a+4*b-a*b;

 writeln('Переменная S= ', S);

end.

Объяснение:

Популярно: Информатика