Помогите !Нужно написать программу по паскалю. Визначити добуток цілих чисел до 20.

Ответ

Автор - антагонист

var a,b:integer;
begin
b:=1;
for a:=1 to 20 do begin
b:=a*b;
end;
writeln('ответ=> ',b);
end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.