
На паскале составить программу которая запрашивает у пользователя целое число и выводит квадрат


Ответы на вопрос

var n:integer;
begin
writeln('Введите число: ');
readln(n);
writeln('Квадрат числа n=',n*n);
end.



begin
write('введите число ');
readln(i);
write('квадрат этого числа= ',I*i)
end.



Программа на языке Pascal для вывода квадрата целого числа, введенного пользователем
Вот пример программы на языке Pascal, которая запрашивает у пользователя целое число и выводит его квадрат:
```pascal program SquareCalculator; var number, square: integer; begin writeln('Введите целое число:'); readln(number); square := number * number; writeln('Квадрат числа ', number, ' равен ', square); end. ```
В этой программе мы используем переменные `number` и `square`. Переменная `number` используется для хранения введенного пользователем числа, а переменная `square` - для хранения квадрата этого числа.
Программа начинается с вывода сообщения "Введите целое число:". Затем мы используем `readln` для считывания целого числа, введенного пользователем, и сохраняем его в переменную `number`.
Далее мы вычисляем квадрат числа, умножая `number` на само себя, и сохраняем результат в переменную `square`.
Наконец, мы выводим сообщение, содержащее исходное число и его квадрат, с помощью `writeln`.
Чтобы запустить эту программу, вам понадобится среда разработки Pascal, такая как Free Pascal или Turbo Pascal. Вы можете скопировать этот код в среду разработки и выполнить его там.
Примечание: Убедитесь, что вы используете правильную синтаксическую структуру и правильные имена переменных при написании программы на языке Pascal.


Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili