Найти сумму и произведение 4 чисел ведённых с клавиатуры
5-9 класс
|
Блок-схема в doc-файле. В цикле от 1 до 4 вводим числа, находим произведение и сумму, выводим на экран.
{Найти сумму и произведение 4 чисел ведённых с клавиатуры }
var
i, n: integer;
s, p, num: real;
begin
n := 4;
p := 1;
for i := 1 to n do
begin
read(num);
s := s + num;
p := p * num;
end;
writeln(s,' ', p);
end.
Другие вопросы из категории
о зашифровано?
а б в г д е ё ж з и й к л м н о п р с т у ф х ц ч ш щ ъ ы э ю я
найдите закономерность и продолжите последовательности:
а) о, д, т, ч,п,...
б) Москва, Абакан, Норильск, Киев,...
Читайте также
(Тема:Программирование ветвлящихся и цепленных алгоритмов)
2.Дано двухзначное число,найти сумму и произведение его чисел.
(2-ая задача решается с div и mod)
(Тема:Программирование ветвлящихся и цепленных алгоритмов )
Найти сумму и произведение четных чисел от a до n (a<n)