Напишите программу нахождения произведения 4 чисел? на Паскале

Question

Информатика

Леня

20 декабря, 05:22

Напишите программу нахождения произведения 4 чисел? на Паскале

+2

Ответы (1)

Знаете ответ на вопрос?

Ларисса · Answer 1

Program Pr1;

uses crt;

var a, b, c, d, e:integer;

Begin

clrscr;

writeln ('Введите 4 числа') ;

readln (a, b, c, d) ;

e:=1;

e:=a*b*c*d;

writeln (e) ;

end.