ответ 1:
Program zadacha;
var
i,n:integer;
begin
writeln ('Введите число: '); readln(n);
for i:=1 to n do write(n-i+1);
end.
ответ 2:
Program zadacha;
var
i,a,b:integer;
begin
writeln ('Введите A: '); readln(a);
writeln ('Введите B: '); readln(b);
for i:=a to b do
if (i mod 2 <> 0) then writeln(i);
end.
ответ 3:
Program zadacha;
var
i,a,b,sum:integer;
begin
writeln ('Введите A: '); readln(a);
writeln ('Введите B: '); readln(b);
for i:=a to b do
if (i mod 10 = 7) then begin sum:=sum+i; end;
writeln('Результат: ',sum);
end.


Алгоритм — точное предписание, определяющее процесс перехода от исходных данных к результату.
Предписание считается алгоритмом, если оно обладает следующими тремя свойствами:
— определенностью, то есть точностью, не оставляющей место произволу при выполнении предписания;
— универсальностью, то есть возможностью обработки различных, находящихся в заранее оговоренных пределах, исходных данных;
— результативностью, то есть направленностью на получение результата.
Давайте немного усложним нашу первую программу: сделаем конвертер двусторонним.
В таком случае программа должна сначала спрашивать у пользователя, какую величину он хочет конвертировать.
Составим текстовый алгоритм действий:
1. Запрашиваем исходные данные: величина, которую будем конвертировать и количество.
2. Если исходная величина фунты, то считаем по формуле Масса (в килограммах) = Масса (в фунтах)*0,45359.
Иначе считаем по формуле Масса (в фунтах) = Масса (в килограммах)/0.45359.
3. Выводим на экран полученный результат с указанием величины.
Составленное нами предписание обладает всеми тремя свойствами алгоритма:
— определенностью: в предписании указаны исходные данные, условия и формулы, по которым надо выполнять расчет; формулы указаны для каждого из двух возможных выборов величин;
— универсальностью: в предписании указаны не конкретные массы, а формулы
Поделитесь своими знаниями, ответьте на вопрос:
b:=(a mod 1000)*10 будет равно 4680 так как 2468 mod 1000= 468(остаток), 468*10=4680;
a:=a/1000+b (2468/1000=2.468) 2.468+4680=4682.468
ответ:a=4682.468;
b=4680;