Написать на языке Паскаля f = (а+в) * 5+3 х F=x^2ya-2d/8

program zz1;

var a, b, c, f, d, y, x:real; / /задаем переменные целого типа

begin

write (' введите первое число '); / / вводим с клавиатуры первое число

read (a);

write (' введите второе число '); / / вводим с клавиатуры второе число

read (b);

write (' введите третье число '); / / вводим с клавиатуры третье число

read (x);

f: = (a + b) * 5 + 3 * x;

writeln (' Результат = ', f); / / выводим первый ответ

write (' введите первое число '); / / вводим с клавиатуры первое число

read (a);

write (' введите второе число '); / / вводим с клавиатуры второе число

read (d);

write (' введите третье число '); / / вводим с клавиатуры третье число

read (x);

write (' введите четвертое число '); / / вводим с клавиатуры четвертое число

read (y);

f:=x * x * y * a - 2 * d/8;

writeln (' Результат = ', f); / / выводим второй ответ

end.