Напишите программу ввода целых чисел с клавиатуры до тех пор, пока не будет введено число

@Dredd1we · Регистрация: 25.02.2014

Author24 — интернет-сервис помощи студентам

Напишите программу ввода целых чисел с клавиатуры до тех пор, пока не будет введено число, удовлетворяющее условию:
а) число положительное;
б) число делится нацело на 6 и больше 60

@ertay-98 · 25.02.2014, 17:12

Сообщение от Dredd1we

Напишите программу ввода целых чисел с клавиатуры до тех пор, пока не будет введено число, удовлетворяющее условию:
а) число положительное;
б) число делится нацело на 6 и больше 60

Вот программа:

Pascal

program p;
var a:integer;
begin
repeat
writeln('Ââåäèòå ÷èñëî');
readln(a);
until (a>60) and (a mod 6=0);
end.

Будут вопросы, пиши

@Dredd1we 0 / 0 / 0 Регистрация: 25.02.2014 Сообщений: 5
		1
	Напишите программу ввода целых чисел с клавиатуры до тех пор, пока не будет введено число 25.02.2014, 16:06. Показов 5513. Ответов 1 Метки нет (Все метки) Напишите программу ввода целых чисел с клавиатуры до тех пор, пока не будет введено число, удовлетворяющее условию: а) число положительное; б) число делится нацело на 6 и больше 60 0

	25.02.2014, 17:12

Опции темы

Напишите программу ввода целых чисел с клавиатуры до тех пор, пока не будет введено число

Решение