tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу для
Составить программу для нахождения суммы всех нечетных целых чисел от 11 до 83
АндрейЯсийчук
3 16.08.2019 05:40
0
Ответы
Mehribonim
20.08.2020 09:29
Var i,n: integer;
Begin
n:=0;
for i:= 11 to 83 do
if i mod 2=0 then n:=n
else
begin
n:=n+i;
WriteLn('i=', i);
end;
Write ('sum=',n);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
сашамалаша2
06.09.2020 00:30
Найди информационный объем сообщения 1 байт равен 8 битам в битах....
andkrutoi2018
06.04.2020 08:30
Дан условный оператор: if(a 17)theny:=aelsey:=a+8 . Условием является все ответы верные y:=a+8 y:=a a 17...
Alien1712
06.04.2020 08:28
1. Какие функции предоставляет PyGame? 2. Что вы можете получить если используете его? 3. Является ли PyGame стандартной библиотекой Python 4. Какая функция присваевает...
loto0192
12.12.2020 05:54
Типы баз данных – иерархические, сетевые, … ....
nastenkasysuev
12.12.2020 05:53
Вывести на печать массив А, если его элементы-целые случайные числа на отрезке от -100 до 100...
victorov113
01.08.2019 19:50
Підгутувати приклади повної і неповною інформації достатньй та недостатний,актуальної та неактуальной...
260111092007
26.11.2020 10:04
Знатоки, решите надо у меня КРФ...
shishkova600
26.11.2020 10:04
Лёд массой 200 г при температуре -5 градусов нагреть до 0 градусов и расплавить при 0 градусов. Сколько энергии потребуется? ДВА ПРОЦЕССА решить с объяснением...
cot579
26.11.2020 10:04
Почему Французская революция 18 века носила буржуазных характер?...
ДашаЛис56
26.11.2020 10:04
Налив в алюминиевый чайник массой 450 г 3 литра воды при температуре 15 0 С и поставив его на плиту мощностью 1,8 кВт, вы ушли во двор смотреть начинающийся футбольный...
Популярные вопросы
Унас (1) фенологов (2) смену явлений природы (3) изо дня в день...
2
Вкаком примере нарушена речевая норма? 1)играть большую роль 2)пластины...
2
Дайте характеристику внутренней политики лжедмитрия 1...
1
1. какие члены предложения называется однородными? 2. какими выражается...
2
Нужно 1)разность двух внутренних односторонних углов при пересечении...
2
Статья 81. 1. при отсутствии соглашения об уплате алиментов, алименты...
3
Решить! световой луч проходит в воздух через воду(п=1,33).каким...
1
Вмагазин фрукты в ящиках - яблоки по 9 кгв ящике, а груши -по...
3
Перевести диалог на казахский язык - - -как дела? - все хорошо,...
3
При каком значении k верно равенство a) a^8×a^k=a^12 б) a^20=a^k×a^10...
1
Begin
n:=0;
for i:= 11 to 83 do
if i mod 2=0 then n:=n
else
begin
n:=n+i;
WriteLn('i=', i);
end;
Write ('sum=',n);
end.