Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
uses crt; var
a,b: integer; begin write('введи возраст саши: '); read(a);
write('введи возраст маши: '); read(b);
writeln; if a> b then write('саша старше маши'); if a< b then write('маша страше саши'); if a=b then write('маша и саша - ровесники'); end.
v - объём цилиндрачисло пи = 3,14язык программирования: паскальvarv, r, h : real; beginreadln (r); readln (h); v : = 3.14 * sqr(r) * h; writeln (v)end.
Популярные вопросы