Начало. Тексты программ

Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску

HelloWorld

Код на языке Pascal:

begin
  writeln('Привет, мир!');
end.

Вычисление площади круга

Код на языке Pascal:

const Pi = 3.1415;

var 
  r: real; // радиус круга
  S: real; // площадь круга
  
begin
  write('Введите радиус круга: ');
  readln(r);
  S := Pi*r*r;
  writeln('Площадь круга равна ',S);
end.
  • Вычисление A8 (промежуточные переменные)
  • Вычисление расстояния между двумя точками на прямой (стандартные функции, abs)
  • Вычисление гипотенузы по катетам (стандартные функции, sqrt)
  • Генерация случайного числа (стандартные функции, random)
  • Перемена местами двух значений (базовые алгоритмы)
  • Выделение цифр из двузначного числа (div mod)
  • Выделение цифр из трехзначного числа (div mod)