с информатикой дополните програму Pascal Abc
Program zadacha;
Var n: integer;
Begin
Write (‘Введи номер месяца’);
Readln(n);
If( n=1) or( n=6) or (n=9) or (n=11) then write (‘вэтоммесяце 31 день’);
If … ….;
If … …;
End.
Вам осталось только дополнить программу, основа уже есть.

inga50    3   20.04.2020 19:26    1