Я думаю что так: 144.69.20.35.1.2
// Листинг программы и скриншот результата в приложениях.
const
max_v = 15;
m1 = -20;
m2 = 50;
var i,j:byte;
v:array [1..max_v] of integer;
a,b:integer;
// начальное заполнение массива
procedure randomArray(tx:string);
var i:byte;
begin
writeln(tx);
randomize();
for i:=1 to max_v do begin
v[i]:=random(m1,m2);
write(v[i]:6);
end;
writeln('');
writeln('');
end;
begin
randomArray('Начальный массив');
writeln('Вывести все элементы,в записи которых есть цифра 5 или 7');
for i:=1 to max_v do begin
//десятки числа
a:=v[i] div 10;
//единицы числа
b:=v[i] mod 10;
if (a=7) or (a=5) or (b=7) or (b=5)
then
writeln(v[i]);
end;
end.
Ответ:
опубликуй полное задание, из этих условий ничего не понятно, если есть таблица, опубликуй
В отличие от линейных алгоритмов, в которых команды выполняются последовательно одна за другой, в алгоритмическую структуру «ветвление» входит условие, в зависимости от выполнения или невыполнения которого реализуется та или иная последовательность команд (серия).