Укажите какое из чисел 205.10 (10 маленькие цифры)10101.2(2 маленькое число)1000.2(2 маленькое число - id638489520211224 от Analochka 24.12.2021 16:17

Question

Информатика: Укажите какое из чисел 205.10 (10 маленькие цифры)10101.2(2 маленькое число)1000.2(2 маленькое число а)наименьшим б)наибольшим

Analochka · Accepted Answer

//Блок-схема во вложении
//Pascal ABC.NET 3.1 сборка 1219

uses
system;

Var
d1,d2:datetime;
a:integer;
begin
writeln('1 дата:');
write('День:');readln(a);d1:=d1.AddDays(a);
write('Месяц:');readln(a);d1:=d1.AddMonths(a);
write('Год:');readln(a);d1:=d1.AddYears(a);
writeln('2 дата:');
write('День:');readln(a);d2:=d2.AddDays(a);
write('Месяц:');readln(a);d2:=d2.AddMonths(a);
write('Год:');readln(a);d2:=d2.AddYears(a);
writeln('Res:',abs((d2-d1).Days));
end.

Пример ввода:
1 дата:
День:1
Месяц:1
Год:1998
2 дата:
День:2
Месяц:1
Год:1999
Пример вывода:
Res:366
Составьте алгоритм определения числа дней между двумя датами и нарисуйте блок-схему. , кто разбирает

Составьте алгоритм определения числа дней между двумя датами и нарисуйте блок-схему. , кто разбирает

Укажите какое из чисел 205.10 (10 маленькие цифры)10101.2(2 маленькое число)1000.2(2 маленькое число а)наименьшим б)наибольшим

MOGZ ответил