Вычислите: а) 28div6б) 174mod14 в) (1342 div8)mod6

a) 4 (целая часть от деления 28 на 6)

б) 6 (остаток от деления 174 на 14)

в) (1342 div8)mod6 = 167 mod 6 = 7

ответы : а) 4; б) 6; в) 7;

program qwerty; uses crt; var a: real; beginclrscr; writeln('введите количество миль'); readln(a); a: = a*1.6; writeln('кол-во киллометров - ',a: 2: 2); readkey; end.

вот проверила, так работает. нормально?

program maxmin; var    a, b, c: integer;     max, min: integer; beginwriteln('введите три числа.'); read(a,b,c); {вводи числа через пробел}max: =a; if(b> max) then max: =b; if(c> max) then max: =c; min: =a; if(b< min) then min: =b; if(c< min) then min: =c; writeln('разность наибольшего и наименьшего чисел равна ',max-min); end.