Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Rita7711
27.02.2021 22:29 •
Информатика
Даны 2 целых числа aив написать программу выводящую на экран значения квадрата целых чисел от а до в включительно
Показать ответ
Ответ:
jockman
08.10.2020 02:15
Var A, B, S1, S2: integer;
Begin
A := StrToInt(Edit1. Text) ;
B := StrToInt(Edit2. Text) ;
S1 := sqr(A) ;
S2 := sqr(B) ;
Label1.Caption := IntToStr(S1) ;
Label2.Caption := IntToStr(S2) ;
End;
0,0
(0 оценок)
Популярные вопросы: Информатика
сульвестр
15.07.2020 20:05
Вася составляет 4-буквенные слова, в которых есть только буквы К, У, М, А, причём буква У используется в каждом слове не более 3 раз. Каждая из других допустимых букв...
GizaHelinc
16.10.2021 12:21
Як змінити форму кривої лінії після її побудови...
taisia20061
01.11.2022 16:32
Дано отрицательное число −910. В восьмиразрядном представлении: (ответ нужно указать в дополнительном коде!)...
elizaveta08071999
17.09.2022 07:41
Які дії можно виконувати з контурами фігури ответе дам 80...
nmio2005
30.09.2020 11:50
Какое из приведенных высказываний является тождественно истинным 1) A ⋀ (A → B); 2) A → B; 3) A → ( A ⋀ B) ∨ A; 4) A ∨ B → A...
tofik4
12.02.2021 08:50
Глаголы: говорит, читает, поёт, наблюдает, смотрит, слушает, объясняет - относятся к источнику информации или же приёмнику информации как можно быстрее ...
Mushvi
19.10.2022 10:41
Яка програма є редактором презентоцій?1.Paint2.Excel3.PowerPoint4.Word...
Жания27
12.02.2021 01:21
напишите на бумаге по-другому не пойму, бошка сломлена уроками...
ghi3
03.07.2021 13:51
Подскажите информатика, кодирование!...
Bbob
04.10.2020 14:37
C++ Статические поля и методы класса. Друзья класса. Паттерн проектирования «Одиночка» - Singleton. Создайте класс, у которого может быть только один объект (экземпляр)....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
A := StrToInt(Edit1. Text) ;
B := StrToInt(Edit2. Text) ;
S1 := sqr(A) ;
S2 := sqr(B) ;
Label1.Caption := IntToStr(S1) ;
Label2.Caption := IntToStr(S2) ;
End;