Function Compare(a,b:integer):char;
begin
if a<b then Compare:='<'
else if a=b then Compare:='='
else Compare:='>'
end;
var
x,y:integer;
begin
Write('Введите два числа через пробел: ');
Readln(x,y);
Writeln(x,Compare(x,y),y)
end.
<span> Язык программирования создал профессор Высшей федеральной технической школы в Цюрихе Николаус Вирт (Niklaus Wirth) и назвал его именем известного французского математика и философа Блеза Паскаля (Blaise Pascal, 1623-1662 гг.). Начало создания Паскаля связано с усилиями Н.Вирта и К.Хоора (C.A.Hoore) переработать язык программирования Алгол-60 и на его основе создать новый. Примерно в 1968 г. бал подготовлен проект языка и начата разработка его транслятора для вычислительной машины CDC 6400, который был готов в 1970 г. В 1971 г. было представлено первое официальное описание языка (Wirth N. The Programming Language Pascal // Acta Informatica. - 1971. Vol1.N1.)</span><span>Интенсивнее всего язык распространялся в 1972-1975 гг. Он удостоился всеобщего признания и стал основным языком публикации программ и преподавания дисциплины программирования. В 1975 г. была создана ассоциация пользователей Паскаля. Позже язык подвергся критике. Пользователи были не удовлетворены слишком строгими ограничениями некоторых конструкций языка. В 1977 г. была создана группа по разработке стандарта языка Паскаль. Ею руководил А.Эддиман (A.M.Addyman). В 1983 г. 1 декабря был объявлен международный стандарт языка Паскаль ИСО 7185.
(В.Тумасонис, В.Дагене, Г.Григас. "Справочник. Паскаль. Руководство программиста" Москва. Радио и связь. 1992г.)</span><span>В 1992 г. фирма Borland International выпустила два пакета программирования, основанные на использовании языка Паскаль - Borland Pascal 7.0 и Turbo Pascal 7.0.
Пакет Borland Pascal 7.0 учитывает многие новейшие достижения в программировании и практике создания программ и включает в себя три режима работы в обычном режиме операционной системе MS DOS, в защищенном режиме MS DOS и в среде Windows.Обладая рассширенными возможностями, пакет требует значительных ресурсов (~ 30 Mb на жестком диске и і 2 Mb ОЗУ). Пакет Turbo Pascal 7.0 обладает ограниченными возможностями и позволяет работать только в обычном режиме MS DOS, но может быть использован практически на любой машине (вплоть до 286) и стоит дешевле.
(А.П,Епанешников, В.А.Епанешников . "Программирование в среде Turbo Pascal 7.0" Мосвка. "Диалог-МИФИ". 1995)</span><span>На современных компьютерах некоторые модули Turbo Pascal 7.0 (например, CRT) работают некорректно. Лучше использовать Borland Pascal 7.0.
В настоящее время, язык Паскаль является общепризнанным языком обучения программированию, сочетающем в себе все основные свойства серьезного алгоритмического языка программирования высокого уровня и доступную форму, позволяющую начинающему программисту освоить технологию создания программы. Кроме того, существуют пакеты, основанные на использовании Паскаля (Delphi, компонентный Паскаль), использующие современный объектно-ориентированный подход.</span>
8 Ячеек
B2|C2
B3|C3
B4|C4
B5|C5
Static void CountArray(int[] a)
{
var s = 0;
var k1 = 0;
var k2 = 0;
foreach(var t in a)
{
if (t > 0)
{
s += t;
k1 += (t % 2 == 1) ? 1 : 0;
k2 += (t > 10) ? 1 : 0;
}
}
Console.WriteLine($"{s} {k1} {k2}");
}