Даны целые числа x, y, c. Написать программу которая находит значение выражения x+y/2c В Pascal

Question

Информатика

Иша

16 января, 09:01

Даны целые числа x, y, c. Написать программу которая находит значение выражения x+y/2c В Pascal

+1

Ответы (1)

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

Арсентьич · Answer 1

program test;

var x, y, c: integer; total: real;

begin

write ('Enter x, y, c: ') ;

readln (x, y, c) ;

total:=x+y/2*c;

writeln (x, '+', y, '/2*', c, '=', total) ;

readln;

end.