Задать вопрос
ИнформатикаИнформатика
19 декабря, 21:15

Найдите произведение целых чисел от 20 до 40.

+2
Ответы (1)
  1. 19 декабря, 21:53
    0
    Var

    P:real;

    i:integer;

    Begin

    P:=1;

    For i: = 20 to 40 do

    P:=P*i;

    WriteLn ('P = ', P)

    End.

    P = 6.70734193572714E+30
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Найдите произведение целых чисел от 20 до 40. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Главная » Информатика » Найдите произведение целых чисел от 20 до 40.
Регистрация Забыл пароль