Три одноклассника — алдан, тимур и юра, встретились спустя 10 лет после окончания школы. выяснилось, что один из них стал врачом, другой , а третий юристом. один полюбил туризм, другой бег, страсть третьего — регби. юра сказал, что на туризм ему не хватает времени, хотя его сестра — единственный врач в семье, заядлый турист. врач сказал, что он разделяет увлечение коллеги. забавно, но у двоих из друзей в названиях их профессий и увлечений не встречается ни одна буква их имен. определите, кто чем любит заниматься в свободное время и у кого какая профессия таблицы истинности

Адлан - турист
Юра - физик 
Тимур - врач

Целое, целочисленный тип данных (англ. Integer), в информатике — один из и самых рас типов данных в языках программирования. Служит для представления целых чисел.

Множество чисел этого типа представляет собой конечное подмножество бесконечного множества целых чисел, ограниченное максимальным и минимальным значениями.

В программировании различают беззнаковые целые числа и целые числа со знаком. Знак числа обычно кодируется старшим битом машинного слова. Традиционно, если старший бит равен 1, то число считается отрицательным, только, если оно не определено как беззнаковое.

Количество чисел в машинном

Объяснение:

Var a,b:array [1..100,1..100] of real;

   current_row,current_column,rows,columns:integer;

begin

 readln(rows);

 readln(columns);

 for current_row := 1 to rows do begin

   writeln();

   for current_column := 1 to columns do begin

     read(a[current_row,current_column]);

     b[current_row,current_column] :=a [current_row,current_column] / 8;

   end;

 end;

 for current_row := 1 to rows do begin

   writeln();

   for current_column := 1 to columns do

     write(b[current_row,current_column]:4, ' ');

 end;

end.