Создание окна в консоли

@rny · Регистрация: 23.12.2014

Как в консоли создать окно и потом выводить текст и считывать уже с этого окна? Чтобы было как на картинке.

@Puporev · 12.12.2015, 15:58

Pascal

program Project1;
uses crt;
var v:byte;
begin
  window(10,5,70,20);
  textbackground(7);
  clrscr;
  repeat
  textcolor(9);
  write('Введите Ваш вариант ответа: ');
  readln(v);
  if not(v in [0..10]) then
   begin
    textcolor(12);
    writeln('Введено некорректное число. Введите число от 0 до 10');
   end;
  until v in [0..10];
readln
end.

@rny · 12.12.2015, 17:50 **[ТС]**

Большое спасибо

@rny 2 / 2 / 0 Регистрация: 23.12.2014 Сообщений: 105
		1
	Создание окна в консоли 12.12.2015, 14:57. Просмотров 1379. Ответов 2 Метки нет (Все метки) Как в консоли создать окно и потом выводить текст и считывать уже с этого окна? Чтобы было как на картинке. 0 Миниатюры

@rny 2 / 2 / 0 Регистрация: 23.12.2014 Сообщений: 105
	12.12.2015, 17:50 [ТС]	3
	Большое спасибо 0

Опции темы