Вывести на экран матрицу 3x6, элементами которой являются целые случайные числа из интервала [10,90]. определить номер мини-мального элемента в каждой строке

pascalabc.net

begin

  var a : = matrrandom(3, 6, 10, 90);

  a.println(3);

  writeln;

  foreach var r in a.rows do

    r.numerate.minby(p -> .print

end.

может кто перепишет на паскаль

вот на c:

#include < stdio.h> int main(void){  int km, day;   day = 1;   km = 10;   while (km < = 200)  {  if (km == 20)  {    printf("20km in %d day\n", day);     }     km += km / 10;   day++;   }  printf("< 200km in %d day", day);   printf("\n");   system("pause");   return 0; }

картинка должна быть в папке с программой и быть в формате bmp

usesgraphabc;

varn: string; b: picture; s: integer;

beginwriteln('введите расстояние до зеркала'); readln(s); write('введите имя файла рисунка: '); readln(n); window.clear; b : = picture.create(n); b.load(n); b.draw(50, 50); b.fliphorizontal; b.draw(50+2*s,50); end.