Контрольная работа
Массивы
1) Заполните массив случайными числами в интервале [0,7]. Найдите все значения, оканчиваю-щиеся на 0, но не делящиеся на 3.
2) Заполните массив случайными числами и найти минимальный элементы массива кратный 3.
3) Заполнить массив случайными числами в интервале [-10,10] и найти в нем произведение чисел, находящихся в интервале от -4 до 5.
{uses Crt;}
const
n=80;
digits=['0','1','2','3','4','5','6','7','8','9'];
var
s:string[80];
i:integer;
begin
{ClrScr;}
Writeln('Введите текст (учитываются только 80 первых символов)');
Readln(s);
for i:=1 to n do
if s[i] in digits then Write(s[i]);
Writeln;
for i:=1 to n do
if not(s[i] in digits) then Write(s[i]);
Writeln;
{ReadKey}
end.
Тестовое решение:
Введите текст (учитываются только 80 первых символов)
Обь с притоком Иртыш 5410км, Амур с Аргунью 4440км, Лена 4400км, Енисей 4102км
5410444044004102
Обь с притоком Иртыш км, Амур с Аргунью км, Лена км, Енисей км
ветвление - это выполнение той или другой последовательности действий в зависимости от выполнения какого-либо условия
например, вспомним сказку А.С. Пушкина "Руслан и Людмила", а именно действия учёного кота:
Идет направо - песнь заводит,
Налево - сказку говорит
алгоритм для кота:
если идешь направо,
то пой песню,
иначе говори сказку
другой пример из жизни:
если сделал уроки,
то отдыхай,
иначе делай уроки
и ещё пример:
если натуральное число делится на два без остатка,
то данное число чётное,
иначе данное число нечётное