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

Задача 8.

Даны два числа А и В. Найти наибольшее из них.

program prim 1;
  uses crt;
{Описываем переменные А и В как целые.}
  var a, b: integer;
begin
  clrscr;
{Вводим два целых числа.}
  writeln('введите 2 числа');
  readln(a,b);
{Если А>В, то выводим на экран А, иначе В.}
  if a>b then writeln(a) else writeln(b);
end.





 У Вас есть материал пишите нам
 
    Copyright © 2008    
Rambler's Top100