logo
Войти Регистрация Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
daria200407
daria200407
28.08.2022 08:00 •  Информатика

Составить программу нахождения суммы чисел от 10 до 20 и вывода их на экран, ! это в паскале!

Показать ответ
Ответ:
voldemarsoybzwx
voldemarsoybzwx
26.08.2020 09:52
Program summa; 
var i,s:integer; 
begin
s:=0; 
for i:=10 to 20 do 
s:=s+sqr(i); 
writeln(s); 
end.
0,0(0 оценок)
Популярные вопросы: Информатика
вика45890
вика45890
09.06.2021 15:53
Перечислите основные признаки понятия операционной системы. например: мяч - круглый, резиновый, небельшого размера, с ним играют дети....
belya84
belya84
16.04.2022 05:51
Написать программу ,которая по номеру года определяет его названия на старояпонском календаре .2004 год -год обезьяны 12 летний цикл 2004 mod 12 =0обезьяна, петух, собака...
helsey
helsey
08.03.2023 20:02
Исправить все ошибки допущенные в программе program task_1_11; var a; b; c; integer; begin writeln ( введите число , a) ; readln(a) b = 5; c: = ab; writeln ( произведение...
Рудиковичный
Рудиковичный
01.06.2020 21:23
Введите два числа х у если второе число не равно нулю то первое число разделить на второе и выдать ответ иначе вывести сообщение на ноль делить нельзя...
милашка357
милашка357
20.05.2020 12:11
Тінтуірдің зияны кандай?​...
anutik4
anutik4
11.07.2020 12:30
Var k, m, t : integer; dat: array[1..10] of integer; begin dat[1] : = 36; dat[2] : = 50; dat[3] : = 23; dat[4] : =41; dat[5] : = 27; dat[6] : = 22; dat[7] : = 59; dat[8]...
katerinaket04
katerinaket04
07.10.2020 15:14
ответить на вопросы И. Долганова в роли Сони Гурвич 1. Опишите портрет героини2. Что мы узнаём о её довоенной жизни ? В какой среде выросла девушка ?3. В чём своеобразие...
СнежаночкаФил
СнежаночкаФил
17.03.2020 08:27
В массиве из 15 элементов из интервала (-10; 10) подсчитать количество положительных элементов...
Виктури
Виктури
25.08.2020 10:47
кст кто есть в роблокс? Ищу лд ник:KOKA_POKATIK Выпишите из предложений имена существительные и местоимения, имеющие вариантные окончания творительного падежа единственного...
катя4799
катя4799
04.02.2022 12:02
При добавлении в раствор этановой кислоты метилоранж становится:жёлтымфиолетовымкрасным​...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота