Эхххх это ж элементарные программы ..... совсем обленились ...
ПИШУ В БЛОКНОТЕ , И МОГУ ОШИБИТЬСЯ.
Цитата:
Program primer_A;
Var a,b,x:real;
begin
write('Enter number a: ');
readln(a);
write('Enter number b: ');
readln(b);
x:=a/sqr(b);
write('The answer will turn out: ');
writeln(y);
end.
|
Дальше по аналогии разберётесь ???