СОСТАВЛЕНИЕ ЗАДАЧИ (задачи «наоборот») 2.1. var n,i,a,k: integer;
begin
readln(n);
k := 0;
for i := 1 to n do begin
readln(a);
if (a mod 3 = 0) and(a mod 10 = 2)
then k := k + 1;
end;
writeln(k)
end.

212

374

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

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

Getara907

Информатика

4,5(42 оценок)

// PascalABC.NET 3.6

begin

var n := ReadInteger('Введите номер летнего месяца:');

case n of

6: Print(30);

7, 8: Print(31)

else

Print('Введен недопустимый номер')

end

end.

Задай свой вопрос

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.