Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
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;
сидерический год
я бы сделал
program p_1; var a,b: real; beginwriteln ('vvedite 1-oe'); read (a); writeln ('vvedite 2-oe'); read (b); if (a> b) thenbegin writeln ( ' 1-oe bolshe (',a,')' ); end; if (a< b) thenbegin writeln ( ' 1-oe menshee. bolshe vtoroe (',b,')' ); end; if a=b thenbegin writeln ('oni ravni'); end; end.
б< т
к< л
с< е
липа ниже березы
к< л< б< т
сосна выше тополя
к< л< б< т< с< е
самое высокое ель
самое низкое клен
Популярные вопросы