урок 12.1 задача 3 форматирование
Primary tabs
Сдавать решение не обязательно:
Исправьте форматирование кода:
var f: integer; begin writeln('Введите целое число'); readln(f); if f < 25 then begin repeat if f mod 23 = 0 then begin f := f - 1; writeln(f); end else f := f - 2; until (f < 1); end else writeln('ошибка'); writeln('Конец!'); readln(); end.
решение
var f: integer; begin writeln('Введите целое число'); readln(f); if f < 25 then begin repeat if f mod 23 = 0 then begin f := f - 1; writeln(f); end else f := f - 2; until (f < 1); end else writeln('ошибка'); writeln('Конец!'); readln(); end.
- Log in to post comments
- 1471 reads
vedro-compota
Tue, 06/07/2022 - 20:06
Permalink
исправить -- если непонятно
исправить -- если непонятно что править, см. разбор
_____________
матфак вгу и остальная классика =)
isaac_fan
Sat, 06/11/2022 - 14:15
Permalink
var f: integer;
vedro-compota
Tue, 06/21/2022 - 20:45
Permalink
есть проблемы, перепроверь
есть проблемы, перепроверь
_____________
матфак вгу и остальная классика =)
isaac_fan
Tue, 07/05/2022 - 15:30
Permalink
var f: integer;
vedro-compota
Thu, 07/21/2022 - 19:09
Permalink
неправильно, см. видео-разбор
_____________
матфак вгу и остальная классика =)
isaac_fan
Mon, 07/25/2022 - 13:06
Permalink
сыллку исправил