Есть ответ 👍

Напишите программу в ПАСКАЛЕ, которая в последовательности натуральных чисел определяет сумму чисел, кратных 6. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 6. Количество чисел не превышает 100. Введённые числа не превышают 300. Программа должна вывести одно число – сумму чисел, кратных 6,нужна правильная программа в ПАСКАЛЕ чтобы работала,если можно прикрепите фото что все работает

186
467
Посмотреть ответы 2

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

Almirgiv
4,6(87 оценок)

Дан во вложении.


 Напишите программу в ПАСКАЛЕ, которая в последовательности натуральных чисел определяет сумму чисел

Var m: real; k: integer; begin m: =100; k: =0; while m> 80 do   begin   k: =k+1;   m: =m*0.99;   end; writeln('k = ',k); end. результат: k = 23

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