7. Составить программу, позволяющую подсчитать количество минут в заданном году.
MrMaks1096:
нужно воодить год или кол-во дней в нем?
желательно
Ответы на вопрос
Ответил MrMaks1096
0
//////////////////////////////////
Приложения:
я думаю при таком уровне вопроса вполне хватит такой программы
Исправил =)
var
a:integer;
begin
writeln('Введите год: ');
readln(a);
if (a mod 4=0) and (a mod 100 <>0) or (a mod 400=0) then a:=366 else a:=365;
if a=366 then writeln('В') else writeln('не');
writeln('В этом году ', a*24*60, ' минут');
end.
a:integer;
begin
writeln('Введите год: ');
readln(a);
if (a mod 4=0) and (a mod 100 <>0) or (a mod 400=0) then a:=366 else a:=365;
if a=366 then writeln('В') else writeln('не');
writeln('В этом году ', a*24*60, ' минут');
end.
var
a:integer;
begin
writeln('Введите год: ');
readln(a);
if (a mod 4=0) and (a mod 100 <>0) or (a mod 400=0) then a:=366 else a:=365;
writeln('В этом году ', a*24*60, ' минут');
end.
a:integer;
begin
writeln('Введите год: ');
readln(a);
if (a mod 4=0) and (a mod 100 <>0) or (a mod 400=0) then a:=366 else a:=365;
writeln('В этом году ', a*24*60, ' минут');
end.
Новые вопросы
Математика,
1 год назад
Литература,
1 год назад
Химия,
2 года назад
Математика,
2 года назад
Алгебра,
7 лет назад