Регистрация
sasha23z
10.10.2021 11:05
Информатика
Есть ответ 👍

Найти сумму и произведение,количество четных чисел на промежутке[10 до 50]. в паскале надо бы программку составить надо.

221
229
Посмотреть ответы 2

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

сонясонясоня1
сонясонясоня1
4,4(1 оценок)
Program n1; var i: integer; sum,k,p: real; begin sum: =0; k: =0; p: =1; for i: =10 to 50 do if i mod 2=0 then begin sum: =sum+i; k: =k+1; p: =p*i; end; writeln('кол-во: ',k); writeln('произведение: ',p); writeln('сумма: ',sum); end.
Nastyaninisvn
Nastyaninisvn
4,6(84 оценок)
=$c1-a$3 если стоит $, значит цифра или буква, перед которой он стоит не изменяется. если же он не стоит, значит ссылки на ячейки изменяются

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