Розробіть програму, яка визначатиме суму парних чисел від 1 до 30. - №6393732

Розробіть програму, яка визначатиме суму парних чисел від 1 до 30.
- Предмет:
  Информатика
- Автор:
  quincyqxxx
- 5 лет назад

Ответы 1

var i,s:integer;begins:=0for i:=1 to 30 do if i mod 2=0 then s:=s+i;writeln('Summa=',s);end.
- Автор:
  Ángelesmitchell
- 5 лет назад
- 0
Добавить свой ответ

Еще вопросы

-2+-2√3 Сколько будет ????
- Предмет:
  Алгебра
- Автор:
  alissonhickman
- 5 лет назад
- Ответов:
  
  1
- Смотреть
Что такое межличностные отношения и процесс общения?
- Предмет:
  Обществознание
- Автор:
  skylarshepherd
- 5 лет назад
- Ответов:
  
  1
- Смотреть
СРОЧНО!!!!!!!ПРОШУ!!!!решитееееееееее

1) Радиус окружности вписанной в равносторонний треугл. равен 2 см
Найти сторону этого треугольника
2) Найдите сторону АB в описанном 4-нике АВСD, если ВD=11 см , СD=13 см , DA=15 см
- Предмет:
  Геометрия
- Автор:
  kathryn2vhw
- 5 лет назад
- Ответов:
  
  1
- Смотреть
где развиваются спермии у млекопитающих животных?
- Предмет:
  Биология
- Автор:
  harper
- 5 лет назад
- Ответов:
  
  1
- Смотреть

How much to ban the user?

1 hour 1 day 100 years