Есть ответ 👍

Составить программу для нахождения произведения целых чисел от 15 до 25

218
238
Посмотреть ответы 3

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

ArT003
4,4(92 оценок)

// pascalabc.net 3.2, сборка 1417 от 28.03.2017 // внимание! если программа не работает, обновите версию! begin   writeln(range(15,25).aggregate(int64(,q)-> p*q)) end. результат 177925144320000

Var     a: integer;     p: real; begin p: =15; for a: = 16 to 25 do       p: =p*a; writeln('p = ',p) end.

Білмим білсемкөмектесер едім

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