ПОМОГИТЕ ПОЖАЛУЙСТА !!!! НАПИШИТЕ ПРОГРАММУ ДЛЯ ПАСКАЛЬ АВС. ВОТ ЗАДАЧА :Даны 4 числа a ,b, с ,d найдите сумму и произведение этих чисел

Вопрос школьника по предмету Информатика

ПОМОГИТЕ ПОЖАЛУЙСТА !!!! НАПИШИТЕ ПРОГРАММУ ДЛЯ ПАСКАЛЬ АВС. ВОТ ЗАДАЧА :Даны 4 числа a ,b, с ,d найдите сумму и произведение этих чисел

Ответ учителя по предмету Информатика

Var

   a,b,c,d:real;

Begin

Write(‘Введите четыре числа: ‘);ReadLn(a,b,c,d);

WriteLn(‘Сумма этих чисел: ‘,a+b+c+d);

WriteLn(‘Произведение этих чисел: ‘,a*b*c*d);

End.