Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Arten098765
05.04.2023 19:27 •
Информатика
Составить программу вычисления суммы 3+6+9++33 на паскале
Показать ответ
Ответ:
rootiopa2
27.06.2020 10:52
Uses crt;
var a,b,c:integer;
begin
a:=3;
c:=3;
b:=0;
while b<>33 do
begin
a:=a+b;
b:=b+c;
end;
writeln(a);
readln
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
opuros33
17.04.2023 09:23
5простых — и 35 ! (предложение ограничено) только для умников и умниц актуально сегодняшнее уникальное предложение — решить 5 простых за 35 ! не упускайте свой шанс — делайте бизнес...
ДашаКотик2007
17.04.2023 09:23
Сочините сказку о единицах измерения информации...
olaseve2007ls
12.09.2020 17:50
Кто такой норберт винер и какова его роль в исследовании информационных процессов?...
2006n
12.09.2020 17:50
Кто такой норберт винер и какова его роль в исследовании информационных процессов?...
S2a0h0i6b
15.02.2023 06:47
Сдвинуть все элементы массива на одну позицию вправо (циклически). последний элемент должен оказаться на месте первого.в паскале...
АнатолийРубчинский
29.03.2022 06:13
Переведите в восьмеричную, шестнадцатиричную и десятеричную систему каждый пример. 1. 31в16 2.441 8^ 3.101 10^ 4.11111011 2^...
nikitacRon
13.12.2021 06:28
Сообщение пришло по смс или по gmail? (см фото)...
Kurgan4511
16.07.2022 02:36
Ученик прочитал книгу состоящею из 40 стр вес каждой стр 150 кб, какой обьем инфорации прочитал ученик?...
Sofja007
16.07.2022 02:36
Что такое браузер? информатика 9класс...
Анна121314151
18.08.2022 01:21
Входные данные: во входном потоке через пробел перечислены три целых числа, значения которых по модулю не превышают 32000. выходные данные: в выходной поток вывести три целых числа...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a,b,c:integer;
begin
a:=3;
c:=3;
b:=0;
while b<>33 do
begin
a:=a+b;
b:=b+c;
end;
writeln(a);
readln
end.