Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
nanaminer
22.07.2021 06:15 •
Информатика
Составить программу для нахождения суммы первых шести чисел.
Показать ответ
Ответ:
иришка19911
01.07.2020 23:25
Program abc;
Var a,b,c,d,e,f,x:integer;
Begin
Writeln('Введите числа');
Readln(a,b,c,d,e,f);
X:=a+b;
X:=x+c;
X:=x+d;
X:=x+e;
X:=x+f;
Writeln(x);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
tamilatumasheva
06.01.2023 13:15
Вкоридоре лежат принадлежащие пришедшим на праздник четырем девочкам сумочки (розовая, голубая, черная и белая) и зонтики (розовый, голубой, черный и белый). девочек зовут маша,...
Милята240106
06.01.2023 13:15
Дан список систем счисления: 2-ая, 8-ая, 10-ая, 16-ая. в каких системах счисления отсутствует запись числа набором символов 276? , решение с объяснением....
AngelChan2004
18.07.2020 23:19
Программирование алгоритмов разветвляющейся структуры Даны действительные числа x и y. Определить, лежит ли точка с координатами (x, y) внутри заштрихованной области. (на c++)...
xotabich21
21.03.2023 10:23
Вкажіть призначення тегів HTML, TerПризначення BODY А) заголовок сторінки в браузері TITLE В) найбільший текстовий заголовок H1 C) основний вміст веб-сторінкиH6 D) найменший текстовий...
ДаниилВолоснов
17.10.2021 10:45
Спишите,разделяя текст на абзацы. Вставьте пропущенные буквы,расставьте знаки препинания . Подчеркните существительные , которые не изменяются по числам ...
maritsumie
29.08.2021 06:41
Чому в літературі середини 19 ст. провідним напрямом стає реалізм , а провідним жанром роман ?...
Diмon
29.10.2020 21:01
2. Опережающее задание: обоснуйте знаки препинания, докажите, что однородными могут быть предложения. Я хочу, чтоб ни войн, ни горестей не изведали наши дети,Чтобы жили они счастливо,...
lika771
30.11.2021 12:31
решить уравнение и задачу...
AnektodaNet
29.12.2020 10:35
Упростить выражение. (1₊tan²a)cos²a₊4sin30⁰...
ololsha99
17.08.2021 04:12
Guess the word bу the explanation of its meaning. 1) someone who teaches people 2) the rules for using the words of the language 3) а musical instrument played bу plucking its strings...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var a,b,c,d,e,f,x:integer;
Begin
Writeln('Введите числа');
Readln(a,b,c,d,e,f);
X:=a+b;
X:=x+c;
X:=x+d;
X:=x+e;
X:=x+f;
Writeln(x);
End.