
Cekus
7 год назад
Помогите со 2 задачкой! пожалуйста, сделать надо на паскале

ОТВЕТЫ

Гермоген
Jul 13, 2019
Program z2;
var s,p,a:real;
Begin
Writeln (Введите периметр квадрата);
readln (p);
a:=p/4;
s:= sqr(a);
Writeln (s=,s);
End.
var s,p,a:real;
Begin
Writeln (Введите периметр квадрата);
readln (p);
a:=p/4;
s:= sqr(a);
Writeln (s=,s);
End.
1
Смежные вопросы: