Решение задачи 3 из главы 10.1
Primary tabs
Решение задачи 3 из главы 10.1
3. Пользователь вводит целое число, если оно больше 100, то выведите на экран все числа от этого числа до 1, иначе же все числа от 1 до этого числа.
program Project3; var i, a:integer; begin writeln('Vvedite zeloe chislo:'); read(a); if (a > 100) then for i:= a downto 1 do write(i, ' ') else for i:= 1 to a do write(i, ' '); readln();readln(); end.
- Log in to post comments
- 1177 reads
vedro-compota
Sat, 09/12/2020 - 20:35
Permalink
решение засчитано
решение засчитано
_____________
матфак вгу и остальная классика =)