Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program z1;
var x,y: real;
begin
writeln('vvedite x i y');
readln(x,y);
if y=5*x*x-7*x+2 then
writeln('yes');
else
writeln('no');
end;
vara,b: integer; c: real; beginwriteln ('введите 1 число'); read (a); writeln ('введите 2 число'); read (b); c: =(a/1)/(1/b); writeln (c); end.
Популярные вопросы