var x,y,a,b: real; begin read(a,b); read(x,y); if y=a*x+b then writeln('точка принадлежит прямой') else writeln('точка не принадлежит прямой'); end.
Ответ дал: Гость
Var s, m: integer; begin writeln('возраст саши = '); read(s); writeln('возраст маши = '); read(m); if s > m then writeln('саша старше маши'); if m > s then writeln('маша старше саши'); if m = s then writeln('одногодки'); end.
Ответ дал: Гость
режим дня трудоголика
проснулся- позавтракал- на работу-домой-поужинал и спать
Популярные вопросы