1. Информатика
  2. Вычислить сумму всех четных

Вычислить сумму всех четных натуральных чисел меньше данного n . паскаль.. по информатике

katya261614 katya261614    2   23.05.2019 16:30    0

Ответы
Angelina922 Angelina922  19.06.2020 10:27
Var a,n,s:integer;
begin
write('введите число n ');
readln(n);
s:=0;
for a:=1 to n do
if (a<n) and (a mod 2 =0) then s:=s+a;
write(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Airehon Airehon  23.09.2019 20:40
На рисунке проиллюстрирована двухзвенная клиент северная архитектура.как называется второе звено этой архитектуры? ​...
Isma24 Isma24  30.03.2021 11:38
Хотел сделать продолжение где у человека был бы выбор продолжать ли ему решать или же нет uses crt; var A,B,C,D : integer; begin write( Введите число: ); readln(A);...
rickieee rickieee  30.03.2021 11:36
Водится а и в причем а в вывести все числа от а до в​...
timirkapro timirkapro  04.11.2020 19:59
Племя Мумба пишет письма, пользуясь 16-символьным алфавитом. Племя Мамба пользуется 32 символьным алфавитом. Вожди племен обменялись письмами. Письмо племени Мумба...
emasihinp08dbq emasihinp08dbq  04.11.2020 20:00
В комнате стоят табуретки и стулья. У каждой табуретки 3 ноги, у каждого стула 4 ноги. Когда на всех табуретках и стульях сидят люди, вкомнате A ног. Сколько табуреток...
Vladik451051 Vladik451051  25.09.2019 02:50
Скорость передачи данных через adsl-соединение равна 128000 бит/c. какова длительность передачи файла через данное соединение (в секундах), если размер файла 250...
NIKTENKOELENA70 NIKTENKOELENA70  25.09.2019 02:50
Устройство для подключения компьютера к телефонной сети - это: a. сетевая карта в. сканер с. модем d. телефонный кабель...
saryglarSayan saryglarSayan  16.06.2019 09:10
Смита и ж. тюрго на хозяйственное развитие? в чё ценность их идей?...
Djama1234 Djama1234  16.06.2019 09:10
Заяц принёс домой качан капусты .соседка сова решила ты принёс 90% води .капуста подсохла и сова сказала что осталось 40% влаги и уменьшение массы на 0,6 кг. какоя...
Dahsa007 Dahsa007  16.06.2019 09:10
По языку вставить модальный глагол подходящий по смыслу в правильной форме. 5. er … die klimaanlage reparieren....

Популярные вопросы