Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
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.
компьютер входит в состав бытовой техники.
компьютер является надсистемой для компьтерных программ.
рыжие и зеленоглазые - 2
рыжие или зеленоглазые - 6
рыжие и не зеленоглазые - 3
не рыжие и не зеленоглазые - 1
var a,b,c,d: integer;
begin
read(a,b,c,d);
if (a*b*c*d mod 3 = 0) then
writeln("pravda")
else writeln("nepravda");
end.
Популярные вопросы