Напишите программу, которая вводит с клавиатуры число А вычисляет результат В зависимости от введённого значения А по формуле, представленной на фото:

15 баллов каждому, устроит?Exercise 1. Insert prepositions of time.(Вставить предлоги времени)Was Easter ____ May last year?Is your birthday____ summer?I'm going to have a party ____ the weekend.I usually come home ___ three o’clock.

это начало

по нему найдёшь?

нет не помогу

жаль

var b,A: integer;

begin

writeln('Введите значение A: ');

readln(A);

if A>0 then

begin

b:=A+5;

writeln('b = ',b);

end

else

if A<=0 then

begin

b:=sqr(A)-1;

writeln('b = ',b);

end;

end.