Напишите программу, которая в последовательности - вопрос №7689278 от spaceman666 05.03.2021 08:16

Question

Информатика: Напишите программу, которая в последовательности натуральных чисел вычисляет сумму всех двузначных чисел,кратных 8. программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0(0-признак окончания ввода, не входит в последовательность.программа должна вывести одно число: сумму всех двузначных чисел, кратных 8.

spaceman666 · Answer

Program hhh54;var i,x,s:longint;begin  read (x);  s:=0;  while x 0 do    begin      if (x 9) and (x 100) and (x mod 8 = 0) then s:=s+x;      read (x);    end;  write (s);end....