Ответы на вопрос:
Var n,i,ks,kp,h: integer; begin; kp: =1; readln(n); for i: =1 to n do begin; readln(h); kp: =kp*h; ks: =ks+h; end; writeln('сумма: ',ks); write('произведение: ',kp); end.
Популярно: Информатика
-
СОСТАВИТЬ СХЕМУ ТЕМЫ АЛГОРИТМ ...
lenyskadi29.01.2021 07:29 -
Опишите последовательность создания параллелепипеда в 3-d модели...
markay11.02.2021 09:39 -
Сиспользованием графического редактора графическую информацию...
БродилаПоЛесу29.08.2020 18:57 -
4. укажите формат оператора цикла с постусловием: a. for x:...
AlbertWasHere01.01.2021 09:14 -
Дан массив d из 10 элементов заполняется с клавиатуры найти...
marinadoren08.04.2023 15:21 -
Из смородины сварили 40кг варенья и разлили в 10 одинаковых...
Ignat2003261221.09.2020 00:09 -
Диагональ параллелограмма образует с двумя его сторонами углы...
ninayurova5129.01.2022 14:33 -
Отец тани отправился на работу пешком в 7ч 40мин .он рассчитал...
поняття27.12.2020 08:30 -
Найдите число, 20% которого равны 43...
glebik2889809.03.2023 20:01 -
1-4 классы що цікавого ти знаєш про рослини?...
vikkkki116.12.2022 20:05