Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Alex90111
07.12.2020 22:14 •
Информатика
Решить , надо вывести на экран квадрат введенного числа
Ответ:
lenok0701
05.10.2020 15:07
Var a: integer;
begin
readln(a);
a := a * a;
writeln(a);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
vgoidin
17.09.2021 06:19
1)дано слово. удалить из него все буквы а . 2)дан текст. переставить слова текста в обратном порядке....
Катя18471
22.09.2021 21:11
Ошибка кроссаут: инсттрукция по адресу 0xc8fd9c06 обратилась к памяти по адресу 0x00000018 . память не может быть written ....
zoyabludova19
16.08.2022 06:29
Что лежит в основе разработки интерфейса проекта?...
mariy30
19.06.2022 11:10
Python 1)дано трехзначное целое число. вывести наибольшую из его цифр.2)дано целое число от 0 до 999. вывести его первую цифру (слева).3)дано целое число от 0 до 999....
kkatya322
21.05.2021 16:17
Разработайте проект анкетирования в электронной таблице, чтобы интерфейс соответствовал основным критериям оценки интерфейса пользователя: простота, комфортность,...
natalavorik
30.07.2022 11:33
Сканер имеет разрешение 512 х 512 dpi. отсканированное изображение размером 8 х 4 дюйма занимает 16 мбайт памяти. чему равна глубина цвета точки (пикселя) отсканированного...
adelinkalinka15
30.07.2022 11:33
11) создать массив целых чисел из 8 элементов, заполнить массив с клавиатуры, вывести массив на экран в одну строку, вывести в следующей строке самое большое число...
Йыч
30.07.2022 11:33
Вася увидел, что на его компьютере открыто окно текстового редактора, где набран текст: . ученик догадался, что это ему шифровка, и составил дешифрующий алгоритм (для...
F3ren9d
06.10.2022 23:16
9) ввести с клавиатуры 10 чисел. подсчитать кол-во четных и нечетных чисел на языке с++ 20...
Alinamail02
04.07.2021 21:01
До вечера . решить по информатике. заранее 3 1. гипотенуза. ограничение по времени, сек 1 ограничение по памяти, мегабайт 64 язык free pascal gnu c gnu c++ delphi...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
readln(a);
a := a * a;
writeln(a);
end.