Начало. Тексты программ: различия между версиями
Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
Нет описания правки |
Нет описания правки |
||
Строка 1: | Строка 1: | ||
=== HelloWorld === | |||
'''Код на языке Pascal:''' | '''Код на языке Pascal:''' | ||
<source lang="pascal">begin | <source lang="pascal">begin | ||
writeln('Привет, мир!'); | writeln('Привет, мир!'); | ||
end.</source> | end.</source> | ||
=== Вычисление площади круга === | |||
'''Код на языке Pascal:''' | '''Код на языке Pascal:''' | ||
<source lang="pascal">const Pi = 3.1415; | <source lang="pascal">const Pi = 3.1415; |
Версия от 11:33, 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 (промежуточные переменные)
- Вычисление расстояния между двумя точками на прямой (стандартные функции, abs)
- Вычисление гипотенузы по катетам (стандартные функции, sqrt)
- Генерация случайного числа (стандартные функции, random)
- Перемена местами двух значений (базовые алгоритмы)
- Выделение цифр из двузначного числа (div mod)
- Выделение цифр из трехзначного числа (div mod)