tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Вычислить сумму четных и произведение
Вычислить сумму четных и произведение нечетных чисел в из n введенных.
НастёнышЬ14
1 19.09.2019 11:40
0
Ответы
nikita577344
08.10.2020 02:12
Var
n,i: Integer;
s,s1: Longint;
BEGIN
Writeln('Введите N: ');
Readln(n);
For i:=1 to n do
If i mod 2=0 Then s:=s+i Else s1:=s1+i;
Writeln('Сумма четных: ',s);
Writeln('Сумма нечетных: ',s1);
Readln
END.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
anastasiyaryum1
11.11.2020 18:48
Напишите наименьшее целое число x, для которого истинно высказывание: НЕ (x нечётное) И НЕ (x 24)...
АллахВТравелах
11.11.2020 18:49
Какие данные содержит директива .data...
solovyevadasha
03.08.2019 10:00
Дан текст. в нем 60 страниц, по 50 символов на страницу. 1 символ = 1 байт кроме этого в каждой строке 10 символов юникод, где 1 символ = 2 байт определить информационный...
Morikachan46
03.06.2019 18:40
Два мальчика петя и вася работают на одном компьютере однажды на жестком диске поселился вирус который заразил некоторые файлы по сведениям пети такич файлов было не более...
Versysbatl
15.02.2021 18:27
Дайте следующим сообщения оценку : «важная», «полезная», «безразличная», «вредная», «достоверная», «объективная», «точная» информация. 1. Сейчас идёт дождь. 2. Завтра экзамен...
фскорбин
15.02.2021 18:26
Дано математическое выражение. Запишите, как оно будет записано в языке программирования Python? а) 2(а+с) б)2х-3у в) г)3х-22у...
Dyadya11
18.07.2019 22:30
Первая бригада разгружает 1500кг за 15 мин а другая 315 кг за 3 мин какая из них работала с большей производительностью...
1Yuki2
18.07.2019 22:30
Определи. где предлог, а где приставка. раскрой скопки. запиши сочетания слов. обясни написание предлогов и пристовок. (по)ходить (росе, (в) писать (в)книжку, (с) бежать (с)...
05DKuzmin
18.07.2019 22:30
Впоследовательности чисел на первом месте стоит число 320, каждое последующее число в два раза меньше предыдущего. какое число стоит на шестом месте?...
АльфисГугу
18.07.2019 22:30
Напишите сочинение на тему : культура чувств...
Популярные вопросы
До текста зачарований ліс доберіть 4 речення...
3
Описать путь лекарства введённого в вену ноги до капилляров руки....
2
План алімпійська дуже 15 пунктів❤️ 20 ів...
2
10. под общей подготовкой (офп) понимают тренировочный процесс, направленный:...
1
30 сочинение по повести тарас бульба по плану(сложному): 1. да разве найдутся...
3
1класс 4 часть прописи горецкий стр 14 и 15 ответы...
1
Mazafaka niga bitch переведите в тетрадке...
3
Выясни значение выражения: 3х*(2-х)^-1/3- (2-x/3x)^-1 при х= 4/7...
2
Улы жибек жолы бойындагы койлык каласындагы базар туралы эссе жазу керек...
3
Как читается по с произношением по эти тексты goldie, goldie, goldilocks...
2
n,i: Integer;
s,s1: Longint;
BEGIN
Writeln('Введите N: ');
Readln(n);
For i:=1 to n do
If i mod 2=0 Then s:=s+i Else s1:=s1+i;
Writeln('Сумма четных: ',s);
Writeln('Сумма нечетных: ',s1);
Readln
END.