Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var a: integer;
begin
writeln ('vvedite nomer mesuaca');
read (a);
if (a=1) then writeln ('30');
if (a=2) then writeln ('28');
if (a=3) then writeln ('30');
if (a=4) then writeln ('31');
if (a=5) then writeln ('30');
if (a=6) then writeln ('31');
if (a=7) then writeln ('30');
if (a=8) then writeln ('31');
if (a=9) then writeln ('30');
if (a=10) then writeln ('31');
if (a=11) then writeln ('30');
if (a=12) then writeln ('31');
end.
100*1000000/8=12500000 байт в секунду
1+2+3-4+5-6=1
1+2+3+4/5+6-7=1
1+2+3-4+5-6+7/8=1
25 декабря 1951 году был создан первый отечественный комп
Популярные вопросы