y=a*a/4

решить задачу паскаль

рассписать по строкам

Question

Федюка

25 сентября, 08:47

+3

Ответы (1)

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

Гана · Answer 1

Вот так надо?

Var y, a:real;

begin

Write ('Введите число а=') ;

readln (a) ; y:=a*a/4;

Write ('Ответ ', y) ;

end.

y=a*a/4решить задачу паскальрассписать по строкам