Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
danil2009cot
14.04.2021 22:35 •
Информатика
Создайте приложение выводящее на экран первые 8 чисел кратных 7 delphi
Показать ответ
Ответ:
Ekaterina2019
08.10.2020 14:00
Procedure TForm1.Button1Click(Sender: TObject);
var
i, k: integer;
s: string;
begin
k := 0;
i := 1;
while k <> 8 do
begin
if (i mod 7 = 0) then
begin
s := s + IntToStr(i) + #13;
Inc(k);
end;
Inc(i);
end;
ShowMessage(s);
end;
0,0
(0 оценок)
Популярные вопросы: Информатика
апепе1
13.06.2022 20:43
Какой объем видеопамяти необходим для хранения изображения при условии, что разрешение изображения равно 64 * 32 пикселей, а количество используемых цветов – 16?ответ...
linmiss
05.04.2021 05:51
Напишите программу, которая в последовательности натуральных чисел определяет сумму всех чисел, кратных 6 и оканчивающихся на 4. Программа получает на вход натуральные...
lenaglukhova20
16.09.2022 11:10
Найди в стихотворении имена существительные. определи какими членами они являются. подчеркни как положено. по улице моховой идёт меховой человек. он идёт в меховой...
ssshhhhhhannnnssha
16.09.2022 11:10
Как правильно аповесццю или аповесцью, прыгажосццю или прыгажосцью...
Qweyudbdbf
16.09.2022 11:10
Из села вышел пешеход со скоростью 4 км/ч. через 3ч вслед за ним выехал велосипедист со скоростью 10 км/ч...
supercrud
16.09.2022 11:10
Какие средства художественной выразительности присутствуют в стихотворении неохотно и несмело ?...
DENCHIK23371
16.09.2022 11:10
Вопрос по языку почему культура строительства на руси была выше чем на юге?...
victoriaanna1
16.09.2022 11:10
Сказка гаршина художники краткий перезказ ! ,...
maksim93949262tue
16.09.2022 11:10
Определите переходность, вид и наклонение выделенного глагола в предложении. счастье не в воздухе вьётся, а в руками делается(посл.) 1)перех.,несов.вид,изъявит.наклон....
andriu12252
16.09.2022 11:10
Cколько граммов соли образуется при взаимодействии 24.5 грамм серной кислоты и 20 грамм гидрооксида натрия...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
i, k: integer;
s: string;
begin
k := 0;
i := 1;
while k <> 8 do
begin
if (i mod 7 = 0) then
begin
s := s + IntToStr(i) + #13;
Inc(k);
end;
Inc(i);
end;
ShowMessage(s);
end;