Составьте программу вычисления суммы всех двузначных чисел, которые делятся на 3 и не делятся на 4.

@Серега92 · Регистрация: 09.10.2012

3)Составьте программу вычисления суммы всех двузначных чисел, которые делятся на 3 и не делятся на 4.

@Paster Fob · 09.10.2012, 14:08

Pascal

var i,sum:integer;
 
begin
  sum:=0;
  for i:=10 to 99 do
    if (i mod 3=0) and (i mod 4<>0) then
      sum:=sum+i;
  writeln(sum);
  readln
end.

@Серега92 0 / 0 / 0 Регистрация: 09.10.2012 Сообщений: 21
		1
	Составьте программу вычисления суммы всех двузначных чисел, которые делятся на 3 и не делятся на 4. 09.10.2012, 10:14. Показов 7244. Ответов 1 Метки нет (Все метки) 3)Составьте программу вычисления суммы всех двузначных чисел, которые делятся на 3 и не делятся на 4. 0

	09.10.2012, 14:08

Опции темы

Решение