Пишем программу на , которая проходит по строкам и создает свою строку f, в которой заменяет черный пиксель на 0 и красный пиксель на 1. стоит заметить что при переходе на новую строку пикселей во время считывания, мы добавляем пробел в нашу строку f. в итоге получаем строку из 7 разных повторяющихся цифр.

156

455

Посмотреть ответы 1

Ответы на вопрос:

max78789867

Информатика

4,5(84 оценок)

Const n = 10; var a : array [1..n] of integer; i,m : integer; begin for i : = 1 to n do //при формировании забил a[i] : = i; //просто индексы m : = 0; i : = 1; while (m = 0) and (i< =n) do begin if a[i] mod 3 = 0 then begin a[i] : = 0; m : = 1; end ; i : = i +1; end; for i : = 1 to n do writeln (a[i]); end.