мета-данные страницы
Загрузка не удалась. Возможно, проблемы с правами доступа?
Различия
Показаны различия между двумя версиями страницы.
Предыдущая версия справа и слеваПредыдущая версияСледующая версия | Предыдущая версия | ||
pascal:algoritms [04/10/2010 02:13] – dnaumov | pascal:algoritms [04/10/2010 02:19] (текущий) – dnaumov | ||
---|---|---|---|
Строка 5: | Строка 5: | ||
uses Crt; | uses Crt; | ||
const | const | ||
- | c = 10; | + | c = 2; |
var | var | ||
- | a, b : integer; | + | a, b, m, i : integer; |
+ | m1, m2, m3 : integer; | ||
BEGIN | BEGIN | ||
{...} | {...} | ||
Строка 14: | Строка 15: | ||
ReadLn(a); | ReadLn(a); | ||
ReadLn(b); | ReadLn(b); | ||
- | {...} | ||
- | </ | ||
- | |**Вывод данных** | ||
- | WriteLn(a); | ||
- | WriteLn(b, '. ', a); | ||
{...} | {...} | ||
</ | </ | ||
Строка 41: | Строка 37: | ||
{...} | {...} | ||
</ | </ | ||
- | | Цыклы | + | |**Вывод данных** |
+ | WriteLn(a); | ||
+ | WriteLn(b, '. ', a); | ||
+ | {...} | ||
+ | </ | ||
+ | | **Циклы** | {{ : | ||
for i:=1 to a do writeln(i, '. ', b); | for i:=1 to a do writeln(i, '. ', b); | ||
{...} | {...} | ||
Строка 53: | Строка 54: | ||
- | ====== Примеры ====== | + | ====== Примеры |
===== Сумма двух чисел ===== | ===== Сумма двух чисел ===== |