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

VeronikaIvanova555 VeronikaIvanova555    1   02.09.2019 09:00    15

Ответы
lesenok277 lesenok277  06.10.2020 11:32
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика