Решить по ивт на языке паскаль. задано 3 числа найти наибольшее из них.

var

a1, a2, a3, max: integer;

      beginwrite('введите три числа: ');

    readln(a1, a2, a3);  

if a1 > = a2

then max : = a1

else max : = a2;

  if a3 > max

then max : = a3;  

writeln('наибольшее из них: ', max);  

readln

end.

Растровая графика - это в основном фотографии, где единицей измерения - являются точки (пикселы). работа чаще всего в растровой графикой (из популярных програм) производится в adobe photoshop, если рассматривать фотографию как таковую, то можно увидеть, что она состоит из множества растров (точек, пикселей). векторная графика - это в основном рисунки, где кривые или прямые линии представляют собой совокупность векторов, направление и величина которых и кривую (прямую) линию. работа с векторной графикой (из популярных программ) производится чаще всего в coreldraw.

Описание n-константа(столбцы) m-константа(строки) объявляем массив "а"  из (1..n,1..m) элементов k,i,z-целые числа х-вещественное объявляем массив "б" из (1..n) элементов начало для i от 1 до n делай для k от 1 до м делай начало считай (х) а(i,k)=х конец х=а(1,1) z=1 для i от 1 до м делай если м целочисленое деление на 2=0 тогда  начало начало для k от 1 до n делай если а(i,k)< х тогда начало б(z)=a(i,k) z=z+1 конец  если z=21 то для k от 1 до n делай а(i,k)=б(k) конец z=1 конец для i от 1 до n делай для k от 1 до м делай начало вывести а(i,k)=х конец конец программы вроде так, орфография и язык плохо похож на короче если бы был pascal, то реализовывать надо было бы так))  просто попробовал перевести на псевдокод)) исправь если что-то не