Войти Регистрация Спроси ai-bota

Составьте программу для нахождения суммы всех четных чисел 1-40

Ответ:

irina2000barano

05.10.2020 07:54

Program n1;
var i,sum: integer;
begin
sum:=0;
for i:=1 to 40 do if(i mod 2=0) then sum:=sum+i;
writeln(sum);
end.

0,0(0 оценок)

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

MaryOnegina

19.04.2022 15:37

В магнитном диске содержится 15 книг. Общий объём диска 1,46 мигобайт.Сколько байт, килобайт занимает 1 книга? . Учитель информатики ужасно объяснил тему урока....

тянка4567

08.09.2022 12:18

в программе := обозначает оператор присваивания, знаки + , - , * и / - соответственно операции сложения, вычитания, умножения и деления. Правила выполнения операция и порядок действий...

daryia210407

22.08.2021 05:01

Какова мощность алфавита, если информационный вес символа равен 5?...

RobloxTop

02.11.2020 23:31

Сколько единиц в двоичной записи числа 8^502 – 4^211 + 2^1536 – 19?...

vinitskay74

14.12.2020 21:22

Составьте программу. (pascal). заниматься программированием мы будем по рабочим дням после 18 часов вечера. введите номер дня недели и время в часах и определите, пришло ли время...

7575757575

25.11.2020 06:41

Напишите логическое выражение данной : если урок будет интересным, то никто из школьников: маша, ира, оля не будет смотреть в окно. постройте таблицу истинности...

user15042001

10.07.2020 15:11

Чому, на думку Федька Котигорошка, село Великі Чаплі є нещасливим на кохання?Доведіть або с міркування героя....

rogaoksi

10.07.2020 15:11

Зайки,кто решит получит рилки Это промежуточная аттестация. фото там прикрепила...

exhedzo

22.09.2020 09:50

Сколько чисел в ряду если его медианой служит среднее арифметическое двадцать первого и двадцать второго членов?...

Habibullo32

08.07.2020 08:59

Ребзи сделать только зделайте без ошибок и все чтобы было видно отмечу как лучший ответ ЗДЕЛАЙТЕ ВСЕ БЕЗ ОШИБОК С СОЧ чтоб все правильно было написано НУ ВЫ ЗАДОЛБАЛИ ЗДЕЛАЙТЕ ПОЧЕМУ...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку