Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Maximus20000
20.10.2022 19:47 •
Информатика
Составьте на языке паскаль программу вычисления суммы первых десяти целых положительных чисел
Показать ответ
Ответ:
Privetcsfvxs
05.10.2020 14:55
Если я все правильно поняла, то должно быть как-то так:
program sum1;
var i: integer;
sum: integer;
begin
for i:= 1 to 10 do
sum:= sum + i;
writeln(sum);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
svetik83
09.07.2021 20:31
Если целое число m делится нацело на целое число n, то вывести на экран частное от целочисленного деления m на n, в противном случае вывести сообщение not completely divisible ....
Brakorenko88
15.07.2021 10:46
Сколько клеток лабиринта соответствует требованию, что выполнив предложенную программу РОБОТ вернется в туже клетку от куда начал движение? Напишите в ответе количество клеток, перечислите...
MedinaIsk
08.06.2022 04:10
І ІЗапишите правильно арифметические выражения в Python. Вы-числите и проанализируйте результат вычисления второго задания.Меняется ли результат вычисления при заключении выраженияв...
tiMYPkomptik
13.05.2021 06:07
Растровое изображение применения...
busiginanst99
05.08.2020 08:05
Сергей сохранил компьютерное изображение размером 1024 х 1536 пикселей. Объем изображения равен 12 Мбайт. Определите количество битов, которые используются для кодирования одного...
kilernosok
04.08.2020 19:22
ОЧЕНЬ На вход программы подается последовательность слов, каждое слово на отдельной строке. Концом последовательности является одно из двух слов: «стоять», «лежать», (маленькими...
pmalino
20.12.2022 05:51
Скорость передачи данных по некоторому каналу связи равна 256000 бит/с, передача данных через это соединение заняла 2 минут. определите информационный объем файла в...
НяФФкА555
15.11.2020 19:05
Считая что робот находится в левом нижнем углу поля составьте программу закрашивания клеток поля в виде буквы о высотой 6 клеток...
Kola2004kola
22.04.2023 14:56
Ученик задает в программе смещение объекта с команд: х+=6; у+=2объект перемещается под углом справа налевообъект перемещается по горизонтали справа налевообъект перемещается под...
долин1
01.01.2022 09:41
Выбери назначение команды import PyGame а.проверка установки библиотеки PyGameб.объявление библиотеки PyGame в программев.импорт библиотеки PyGameг.удаление библиотеки PyGameд.Ученик...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
program sum1;
var i: integer;
sum: integer;
begin
for i:= 1 to 10 do
sum:= sum + i;
writeln(sum);
readln;
end.