Составить программу на языке Паскаля: Даны четыре числа. Найти сумму и произведение этих чисел

Question

Информатика

Идея

21 июля, 22:37

Составить программу на языке Паскаля: Даны четыре числа. Найти сумму и произведение этих чисел

+5

Ответы (1)

Знаете ответ?

Кристинка · Answer 1

Program MyProgram;

var

a, b, c, x:integer;

begin

readln (a, b, c, x) ;

writeln ('Сумма: ', a+b+c+x) ;

writeln ('Произведение: ', a*b*c*x) ;

end.