Информатика на пять О нас
 Добавить в избранное
5byte.ru
 Теория
 8 класс
 9 класс
 10 класс
 11 класс
Задания
 8 класс
 9 класс
 10 класс
 11 класс
Книги
Тесты
ЕГЭ
Turbo Pascal 7
 Описание
 Задачи
HTML
Рефераты

Задача 5.

Как ввести с клавиатуры переменную булевского типа

program BooleanInput;
   var eat:boolean;
       ch:char;
begin
   write('Tы хочешь есть [y/n]?:');
   readln(ch);
   eat: = ch = 'y';
   writeln('Твой ответ:',eat);
   readln
end.





 У Вас есть материал пишите нам
 
    Copyright © 2008    
  Top.Mail.Ru