Помогите пожалуйста!! Это СРОЧНО!!!
Lazarus

Ответы и объяснения

Ответ:
1.
var
a,b,i,s:integer;
begin
writeln('Введите A:');
readln(a);
writeln('Введите B:');
readln(b);
s:=1;
for i:=a to b do
s:=s*i;
writeln('произведение всех целых чисел от A до B включительно:', s);
end.
Добавить ответ

УЗНАВАЙ
БОЛЬШЕ НА
школьникам!
У тебя проблема с домашними заданиями? Попроси о помощи!
- 80% ответов приходят в течение 10 минут;
- Мы не только ответим, но и объясним;
- Качество гарантируется нашими экспертами.
Самые новые вопросы