Напишите программу, переводящую время, указанное в минутах, во время в часах и минутах.

Var h,m: integer; begin write('введите число минут: '); readln(m); h: =m div 60; m: =m mod  60; writeln('час: ',h,'; мин: ',m); end.

Pascalabc.net 3.3.5, сборка 1662 от 29.04.2018 внимание! если программа не работает, обновите версию! begin   var n: =readinteger('n=');   if n.between(2,10) then begin       var i: =1;       repeat           write(n,'x',i,'=',n*i,' ');           i+=1       until i> 10;       writeln       end   else writeln('число должно быть от 2 до 10') end. пример n= 6 6x1=6 6x2=12 6x3=18 6x4=24 6x5=30 6x6=36 6x7=42 6x8=48 6x9=54 6x10=60

Pascalabc.net 3.3.5, сборка 1662 от 29.04.2018 внимание! если программа не работает, обновите версию! begin   var (a,b,h): =(0.0,3*pi,0.6);   var x: =a;   var (k,s): =(0,0.0);   while x< =b do begin       var y: =x*sin(x);       writeln(x: 5: 1,y: 18: 13);       if y> 0 then k+=1 else s+=y;       x+=h       end;   writeln('положительных- ',k,', сумма отрицательных ',s) end. пример   0.0    0.0000000000000   0.6    0.3387854840370   1.2    1.1184469031607   1.8    1.7529257355808   2.4    1.6211116333228   3.0    0.4233600241796   3.6  -1.5930735958615   4.2  -3.6606182441371   4.8  -4.7815901224120   5.4  -4.1729282328023   6.0  -1.6764929891936   6.6    2.0561729991883   7.2    5.7144086197139   7.8    7.7886380939219   8.4    7.1786308279416   9.0    3.7090663671758 положительных- 10, сумма отрицательных -15.8847031844065