Надеюсь в школе вы пишете на паскале, как и я:
var i:integer;
begin
readln(i);
if iwriteln(i);
end.
Новые вопросы
Русский язык, 27 дней назад
Английский язык, 27 дней назад
Математика, 1 месяц назад
Математика, 1 месяц назад
Алгебра, 5 лет назад
Геометрия, 5 лет назад
Лучшие помощники
Помощников пока нет:( Станьте первым!
- 2023 — Znanijam.net | Бесплатные знания для всех
- Контакты
- Пользовательское соглашение
- Политика обработки данных
Входя или регистрируясь на сайте, вы принимаете условия Политики обработки данных и Пользовательского соглашения.
Источник: znanijam.net
Исходник программы, которая возводит в квадрат заданное число
Исходник простой программы, которая возводит в квадрат введенное с клавиатуры число. Открывается программами Pascal ABC, Pascal ABC.Net и Turbo Pascal. Пояснительных комментариев к строкам нет. Имеет не скомпилированный формат для редактирования .pas. Данная программа использует оператор sqr.
Паскаль с Нуля. Циклы с условиями. Урок 6
Исходный код программы для нахождения квадрата числа:
var a, c:integer;
begin
writeln (‘Введите число’);
readln (a);
c:=sqr(a);
writeln (‘Квадрат равен ‘,c);
end.
Разобраться в коде данной программы Вы можете, изучив Урок №3 — операторы корня, модуля, квадрата числа. Скачать исходник программы, которая находит корень из числа вы можете тут.
Источник: zedpost.ru
Составить программу возведения натурального числа в квадрат — Free Pascal
Помогите пожалуйста! Составить программу возведения натурального числа в квадрат, учитывая следующую закономерность: 1^2=1 2^2=1+3 3^2=1+3+5 4^2=1+3+5+7 . n^2=1+3+5+7+9+. +(2n-1) Запрещается использовать операцию умножения, функции возведения в степень, экспоненты и логарифма. Ниже приведен рекомендуемый вид экрана программы во время ее работы. #1 Введите натуральное число -> 4 Квадрат числа 4 равен 16.
Код к задаче: «Составить программу возведения натурального числа в квадрат»
Листинг программы
var n,i,s:integer; begin writeln(‘Введите натуральное число’); write(‘->’);readln(n); s:=0; for i:=1 to n do s:=s+2*i-1; writeln(‘Квадрат числа ‘,n,’ равен ‘,s) end.
Источник: studassistent.ru