kulakov2003
21.09.2020 00:55

C++реализовать структуру дата (date). она должна содержать следующие поля:

 год

 месяц

 день

методы:

 bool isleapyear() – определяет високосный год или нет

 int monthdays() – определяет количество дней в месяце

 void tonextdate() – перезаписывает на следующую дату

 void toprevdate() - перезаписывает на предыдущую дату

 void adddays(int d) – перезаписывает дату со смещением на d дней вперед

 void deldays(int d) - перезаписывает дату со смещением на d дней назад

 int cmpdate(date date) – сравнивает даты (даты равны – 0, даты различны –

разницу в днях > 0 или < 0)

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ivankornev00
23.12.2021 17:21
Пишу на Delphi (ObjectPascal):

function Summa(a,b:integer):string;
var a1,b1:integer;
begin   //находим сумму первого числа
a1:=(a div 1000)+((a div 100)mod 10)+((a mod 100)div 10)+(a mod 10);

//находим сумму второго числа
b1:=(b div 1000)+((b div 100)mod 10)+((b mod 100)div 10)+(b mod 10);

//выясняем что больше
if a1>b1 then         
   Result:='Сумма цифр левого числа больше. Оно равно: '+IntToStr(a1)         
else         
Result:='Сумма цифр правого числа больше. Оно равно: '+IntToStr(b1);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin //Выполнение и вывод результата функции через нажатие кнопки
Label1.Caption:=Summa(StrToInt(Edit1.Text),StrToInt(Edit2.Text));
end;
Даны два четырехзначных числа. определить, сумма цифр которого из них больше. подсчет суммы цифр орг
0,0(0 оценок)
Ответ:
Дианчик777
11.06.2020 05:19
Лучше скачайте прикреплённый файл, так как здесь всё слилось))
1) varA, B: integer;beginreadln(A);readln(B);if (A>B) then writeln(A)else writeln(B);end.2)varA, B: integer;beginreadln(A);readln(B);if (A>B) then writeln(B)else writeln(A);end.3)varA, B: integer;beginreadln(A);readln(B);if (A>B) then  beginwriteln (A, ' - максимальное число');writeln (B, ' - минимальное число');end;if (B>A) then beginwriteln (B, ' - максимальное число');writeln (A, ' - минимальное число');end;end.4)varA, B, c, d: integer;beginreadln(A);readln(B);c:= A+2*B;d:= 3*A-B;if (c>d) then  writeln ('A+2B > 3A-B')else writeln ('3A-B > A+2B');end.
Воот))
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота