Предмет: Информатика, автор: chyntemirovaguldana

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

Ответы

Автор ответа: Аноним

0

program chik;

var s,i,n:integer;

begin

readln(n);

for i:=1 to n do

if(i mod 2=0)then s:=s+i;

writeln(s);

end.

Предыдущий вопрос

Следующий вопрос

Интересные вопросы

Предмет: Қазақ тiлi, автор: oooooooooosan72

3. Екі мәтіннен мына сөздердің синонимін және антонимін табыңыз.
a. тұтқын -
б. семіру -

5 лет назад

Предмет: Английский язык, автор: dddddaaaammmmii

Listen to the audio. You will listen to the recording twice and mark statements: True or False.

1. Yuri was an engineer before he became an astronaut.________
2. Yuri has on the ICC. (International Space Station) _______
3. Yuri was from the USA __________
4. He became an astronaut in 1987______
5. He and his wife have been in space together._______
6. Andy and Kate have already finished their project._______

5 лет назад

Предмет: История, автор: auroraossdroelf

Задания 1. Соотнесите термины с их смысловым значением 1 Илоты A | Полноправный коренной житель Афин 2 | Гражданин B Выходцы из окраин полиса 3 | Периэки 4 | Метеки с Племена ахейцев, подчинённые спартанцами D | Главный орган управления в Афинах E Oрган управления в Спарте, в который входили мужчины старше 5 | Народное собрание 60 лет 6 | Герусия F Люди, переселившиеся в Афины 1 2 3 4 5 6 порого, со локом F

5 лет назад

Предмет: Алгебра, автор: explosionbesola

Решите пожалуйста $(x-2)^{2} -(1+x)(x-1)=?$

8 лет назад

Предмет: Алгебра, автор: Nyet

8m+2-(5-7m)-4m при m=-2

8 лет назад