Составьте алгоритм определения числа дней между двумя датами и нарисуйте блок-схему. Created by zhgulevatanya. informatika-ru

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

zhgulevatanya @zhgulevatanya

July 2022 1 9 Report

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

Answers & Comments

Gleb1Kosyrev

Verified 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

3 votes Thanks 2

Answers & Comments

Verified answer

Из колоды в 36 карт одновременно вытаскивают 2 карты. Найдите вероятность того, ...

Поместив предмет высотой 2 см перед собирающей линзой на расстоянии 2.5 см от не...

20 аминокислот, входящий в состав белков называются А) Заменимые Б)Незаменимые В...

(1 + 16,5)¹²)...

Почему при нумерации строк впереди ставят 1?...

Праздники Западной и Восточной цивилизаций...

x^2-9≥0...

x^2+5cosx найдите какую-нибудь первообразную, значение которой в точке х=-пи - о...

Спортсмен совершает прыжок с шестом. Сила тяжести действует на спортсмена: 1. То...

Помогите, пожалуйста. Определить масштаб чс: 1.Пострадало 461 человек 2.Нарушены...

рекомендуемые вопросы

Helpful Links

Helpful Social