Цикл - Паскаль, Turbo Pascal, PascalABC.NET

nagabara · 26.06.2011, 12:05

Найти сумму всех n-значных чисел (1 <= n <= 4). У меня возникла тут не большая загвоздка. Помогите поставить условие, например если n>4 чтобы шел запрос на повторный ввод n. Буду очень признателен

Alex11223 · 26.06.2011, 12:13

Код:

repeat
   readln(n);
until (n>=1) and (n<=4)

26.06.2011, 12:05	#1
nagabara Новичок Джуниор Регистрация: 26.06.2011 Сообщений: 5	Цикл Найти сумму всех n-значных чисел (1 <= n <= 4). У меня возникла тут не большая загвоздка. Помогите поставить условие, например если n>4 чтобы шел запрос на повторный ввод n. Буду очень признателен

26.06.2011, 12:13	#2
Alex11223 Старожил Регистрация: 12.01.2011 Сообщений: 19,500	Код: `repeat readln(n); until (n>=1) and (n<=4)` Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223 ЛС отключены Аларом.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Цикл по времени - Как сделать так чтобы цикл выполнялся к примеру 10 секунд ?	Anarki	Общие вопросы C/C++	3	13.11.2009 19:23
Цикл do while	S@muel	Общие вопросы C/C++	1	29.03.2009 23:01
Цикл с предусловием. ( цикл while) Цикл с постусловием. (цикл repeat ... until)	Mr.User	Помощь студентам	9	23.11.2007 01:34