Прошу помогите исправить цикличную программу так , чтобы она находила произведение трёх чисел. Паскаль
Приложения:
Ответы
Ответ дал:
0
program tt;
uses crt;
var
s, x: real;
i: integer;
s:=1;
i:=1;
while i <= 3 do
begin
write ('Введите число ');
read (x);
s:=s*x;
i:=i+1;
end;
write ('сумма чисел равна ', s);
end.
Похожие вопросы
1 год назад
1 год назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад