Начало. Тексты программ: различия между версиями

Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
Строка 30: Строка 30:
=== Выделение цифр из двузначного числа ===
=== Выделение цифр из двузначного числа ===


* Выделение цифр из трехзначного числа (div mod)
===  Выделение цифр из трехзначного числа ===

Версия от 21:27, 10 ноября 2009

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

Вычисление расстояния между двумя точками на прямой

Вычисление гипотенузы по катетам

Генерация случайного числа

Перемена местами двух значений

Выделение цифр из двузначного числа

Выделение цифр из трехзначного числа