Var a,b: integer;
Begin
Writeln('Введите a,b');
readln(a,b);
Writeln(a-sqr(b));
readln();
<span>end.</span>
П о р д а ы э к е н г ф й ц у я ч
Соляная кислота это вещество состоящее из водорода и хлора.
Соляная кислота=(водород+хлор)
Var b; integer;
begin
writeln ("В каком году появились первые ЭВМ?'');
readln (b);
if b=1943 then
writeln ('Вы правы!')
else
writeln ('<span>Вы ошиблись, прочитайте свою рабочую тетрадь ещё раз!</span>');
end.