Регистрация
AutWezer
03.06.2021 01:58
Информатика
Есть ответ 👍

Даны 5 натуральных чисел.выяснить сколько из них являются нечетными числами и сколько из них кратны 3 и не кратны 5. , язык паскаль.

294
491
Посмотреть ответы 2

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

05gazieva05
05gazieva05
4,5(73 оценок)
Var   i,k,n1,n2: integer; begin   n1: =0; n2: =0;   write('введите 5 натуральных чисел: ');   for i: =1 to 5 do begin       read(k);       if k mod 2< > 0 then inc(n1);       if (k mod 3=0) and (k mod 5< > 0) then inc(n2)       end;   writeln('нечетных- ',n1,', кратных 3 и не кратных 5- ',n2) end. пример введите 5 натуральных чисел: 11 8 33 15 27 нечетных- 4, кратных 3 и не кратных 5- 2
Chchcjcujcj
Chchcjcujcj
4,8(41 оценок)

берем 1 число с начала и одно с конца:

1+10=11

2+9=11

и т.д

всегда получается 11.найдем количество таких пар и полученное число умножим на 11.

10: 2 =5- 5 пар получится

5*11=55 сумма целых чисел от 1 до 10

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