7. Program jdgk;
var a,b: integer;
begin
b:=0;
writeln(a);
readln(a)
if a>0
then b:=a+15
else b:=a+25
writeln(b)
end.

8. n=7

9. if A>0
then writeln('Положительное')
else writeln('Отрицательное')

Если А>0, то положительное
иначе отрицательное.

10. если х>5 то y:=x-5
иначе y:=5*x*x (или 5*sqr(x))

If х>5 then y:=x-5
else y:=5*x*x (или 5*sqr(x))

11. If = Если

12. Then = Тогда

13. Else = Иначе