Ответы на вопрос:
Var a: array[1..200] of integer; n,m,j,k: integer; begin writeln('введите кол-во недель'); readln(n); writeln('введите кол-во месяцев'); readln(m); writeln('введите кол-во лет'); readln(j); k: =7*n+30*m+j*365; writeln('кол-во дней=',k); end.
Популярно: Информатика
-
Катюша123321009.06.2020 21:38
-
poliska33304.02.2021 16:34
-
2004by201331.08.2020 14:07
-
Nelai5422.09.2020 00:32
-
саша400510.04.2022 01:12
-
Negogda30.08.2021 22:12
-
Ziri1207.11.2021 17:39
-
isokova0127.06.2022 15:11
-
Енотик8323.08.2021 20:08
-
kalishevij9903.05.2020 17:30