Урок 9 Задание 11
Primary tabs
УСЛОВИЕ:
Есть программа: z,s:integer; f:boolean; begin s:=1; if (z=s) and (f=false) then begin writeln();// делаем перенос строки z:=0; s:=s+1;//но увеличиваем кол-во строк end; if (z=s) and (f=true) then begin writeln(); // делаем перенос строки z:=0; s:=s-1;//но уменьшаем кол-во строк end; end.-- в двух условных операторах действия частично совпадают, а значит наблюдается дублирование кода. Перепишите код так, чтобы дублирования не было.
Подсказка: используйте вложенные блоки if().
Если идей нет, смотрите разбор решения.
Попытка решения:
program U9Z11; var z,s:integer; f:boolean; begin s:=1; if (z=s) then begin writeln(); z:=0; if (f=true) then // ...... s:=s-1;//но уменьшаем кол-во строк end else if (f=false) then s:=s+1;//но увеличиваем кол-во строк end.
- Log in to post comments
- 3599 reads
vedro-compota
Sun, 07/11/2021 - 13:46
Permalink
отформатируйте код
_____________
матфак вгу и остальная классика =)
nglag
Sun, 07/11/2021 - 18:23
Permalink
Код изменил и отформатировал
vedro-compota
Thu, 07/15/2021 - 19:38
Permalink
форматирование неверно +
форматирование неверно + сейчас блоки работают как независимые, что неверно
_____________
матфак вгу и остальная классика =)
nglag
Fri, 07/16/2021 - 11:47
Permalink
Отформатировал:
vedro-compota
Sun, 07/18/2021 - 11:39
Permalink
сравнить работу с исходным кодом
-- так можно проверять, сравнивая решения
_____________
матфак вгу и остальная классика =)