Автор: Настена (14.12.2013 в 22:10)
Вариант V
1. Составить логическое выражение, значение которого равно True, если высказывание истинно, и False, — если ложно.
Каждая следующая цифра данного трехзначного натурального числа на единицу больше предыдущей.
2. Точно и четко сформулировать условие задачи, которая решается в данной программе:
Program Kr_2_3;
Var N : LongInt; M : 0..9;
Begin
Write('введите натуральное число: '); ReadLn(N);
M := 0;
While N <> 0 Do
Begin
If N Mod 10 > M Then M := N mod 10;
N := N div 10
End;
WriteLn('Ответ: ', M)
End.
Задать натуральное число N. Определить, чему будет равно значение M для заданного N.
3. Вычислить произведение
P = 3 * 6 * ... * (3n).
4. В данном линейном целочисленном массиве каждый элемент с четным индексом увеличить на значение индекса, с нечетным — уменьшить на значение индекса.
5. Данную строку зашифровать по следующему принципу: заменить каждый символ на следующий по порядку символ таблицы ASCII.
кто что знает,напишите пожалуйста...очень надо(((