Определить правильность написания строки кода - Pascal ABC
Формулировка задачи:
Можно ли так писать?
while (b[3]<>b1[3]) and (b[2]<>b1[2]) and (b[1]<>b1[1]) do begin?
(b,b1:array[1.100] of integer
Можно ли так писать?
while (b[3]<>b1[3]) and (b[2]<>b1[2]) and (b[1]<>b1[1]) do begin?
Решение задачи: «Определить правильность написания строки кода»
textual
Листинг программы
i:=1; while(i<n-1)and(b[i]<>b1[i]) and (b[i+1]<>b1[i+1]) and (b[i+2]<>b1[i+1]) do i:=i+1; if i>n-2 then write('нету')else write('есть')
Объяснение кода листинга программы
- Переменная i инициализируется значением 1.
- Запускается цикл while, который будет выполняться до тех пор, пока i меньше n-1 и все значения b[i], b[i+1] и b[i+2] не равны b1[i], b1[i+1] и b1[i+2] соответственно.
- После каждой итерации цикла значение i увеличивается на 1.
- Если i становится равным n-2, то выводится сообщение
нет
. - Если i становится равным n-1, то выводится сообщение
есть
.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д