Регистрация
semik1232
10.02.2023 09:33
Информатика
Есть ответ 👍

Создайте математическую модель периметра треугольника​

114
263
Посмотреть ответы 1

Ответы на вопрос:

KristinaE16
KristinaE16
4,4(61 оценок)

programm p;

var n: integer;

begin

readln(n);

if n/4=int(n/4) then

begin

if (n/100=int(n/100))and(n/400< > int(n/400)) then

writeln('не високосный') else

writeln('\високосный';

end

else writeln('не високосный')

 

end;

Популярно: Информатика