tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Впаскале. написать программу
Впаскале. написать программу вычисления суммы всех двухзначных нечетных чисел.
НастюшаКороткая
3 23.07.2019 12:20
2
Ответы
Aye03
03.10.2020 11:34
Var a,s:integer;
begin
s:=0;
a:=11;
while a<=99 do
begin
s:=s+a;
a:=a+2;
end;
writeln('s = ',s);
end.
Результат:
s = 2475
ПОКАЗАТЬ ОТВЕТЫ
tinaZ07
03.10.2020 11:34
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
Write(Range(11,99,2).Sum)
end.
Результат выполнения программы:
2475
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
shabalin06
10.04.2020 15:17
Написать первые 70 чисел 18-ой системы счисления...
русел222033
10.04.2020 15:17
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от - 20 до 20 - сведения о температуре за каждый день ноября. Напишите программу, которая находит...
гсооагвгв
10.04.2020 15:17
Який загальний вигляд команди циклу з передумовою в обджект паскал...
nataliyadydina
10.04.2020 15:16
Як виконується команда циклу з передумовою в обджект паскаль...
shaimyr24
10.04.2020 15:16
Как можно примерно подсчитать количество шагов при двоичном поиске?...
arinasuper000
29.03.2020 03:02
очень нужно 1)Когда компьютерная графика может рассматриваться как одно из направлений информатики, а когда-как самостоятельная дисциплина? 2)Почему комп.графика так привлекает...
AIDA196
29.03.2020 01:24
Запишіть за до умовного оператора :якщо значення зміної х від ємне то збідьшити його на 5 у протилежному випадку зменшити на 2...
Аоаоаоа13362727182
17.02.2021 09:50
Составьте программу рисования ряда одинаковых цветков с использованием процедуры Flower (рис. 3.23)....
MaxTwAiNer12
17.02.2021 09:48
Жуйелик жане колданбалы программалык камтама арасындагы байланысты табындар....
QureAdmiral
17.02.2021 09:47
Создайте web-страницу о вашей любимой книге....
Популярные вопросы
1. Определите название и охват времени карт; 2. Определите в чем сходства двух...
1
А) РАВС - пирамида; основание - правильный треугольник; Какой из отмеченных...
3
10-тапсырма. Көп нүктенің орнына қажетті сөзді қойып жаз. Жазғаныңды оқы. Қате...
2
Мәтінді оқып , « Позиция таңдау әдісімен көзқарастарыңды ауызша дәлелдендер...
1
1) Which verb forms are Present Perfect? a) had b) hasc) had hadd) has had e)...
1
Назовите следующие соединения....
2
Спешите предложение найдите односоставное предложения с главным членом - подлежащим....
1
Отметь формулу оксида: HBr NO Mg(OH)2 CaF2...
1
Соберите предложения. Апохвалил меняучитель,«Какая твоя любимаясказка?»Друг...
2
1. Выделите 5 ключевых слов в тексте. 2. Озаглавьте текст. 3.Определите...
3
begin
s:=0;
a:=11;
while a<=99 do
begin
s:=s+a;
a:=a+2;
end;
writeln('s = ',s);
end.
Результат:
s = 2475
begin
Write(Range(11,99,2).Sum)
end.
Результат выполнения программы:
2475