Ответы
Ответ дал:
0
var b,y:integer;beginb:=0;y:=0; Writeln( 'Ââåäèòå ÷èñëî B '); readln(b); y:=sqr(b)-100; Writeln(y); readln;end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
9 лет назад
9 лет назад