Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
GanyaOle
13.10.2021 07:49 •
Информатика
Найдите сумму 1*2+2*3+3*4++9*10. составьте программу на языке паскаль. !
Ответ:
Bsusb
15.09.2020 18:57
Var
i, s: integer;
begin
s:=0;
for i:=1 to 9 do
s:=s+i*(i+1);
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Мейвис00
30.11.2021 07:41
Запишите на языке paskal выражение s=2r+d...
filatevanastya1
30.11.2021 07:41
Набор символов, используемых для записи сообщения·...
kate831
02.01.2020 08:03
Ввести в оперативную память значение целочисленной переменной x var x: integer var x:real write(x) read(x) Вывести на экран монитора значение целочисленной переменной x var x:...
Дрындель
22.08.2022 09:05
Опиши алгоритм намалювання шетикутника...
Сяй
17.01.2023 02:33
What is the connection of Rizal to Katipunan...
sstadina9
17.01.2023 02:33
III.Put the verbs in brackets into the Past Perfect. He ___ (meet) her before somewhere. Jill ___ (to phone ) Dad at work before she left for her trip. When he arrived the match...
miratarnovskaya
17.01.2023 02:33
6. Рустем с постоянной скоростью выполнит одну работу за 12 дней. За сколько днейРустем закончит эту работу, если онувеличит скорость в два раза?А) 2В) 3C) 4D) 6E) 8...
Maara
28.03.2022 19:19
с заданием по английскому языку.Переведите текст....
daryaladelshhikova
04.10.2021 12:01
Колесо радіусом 40 см робить один оборот за 0,4 секунди. Знайти швидкість точок на ободі колеса....
2303010
05.06.2020 16:49
Какая роль Оливера Кромвеля в английской буржуазной революции?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
i, s: integer;
begin
s:=0;
for i:=1 to 9 do
s:=s+i*(i+1);
writeln(s);
end.