Распределите выражения в соответствии с типом результата.

(столбцы)
Integer
Real
String
Boolean

(выражения)
5 + 10
5 mod 10
50 / 10
0.5 * 10
5 div 5 / 1
‘real’
‘5’+’2’
5 = 5
5 < 2

program ssd;

  uses crt,graph;

  var       d,m: integer;

  begin

  clrscr;

  initgraph(d,m,'');

  arc(200,200,360,180,50);

  line(150,200,250,200);

  readkey; closegraph;

  end.

f8 формула: =b12*5. b5 формула: =а4+d6. c7 формула: =d6/$a$2. f9 формула: =$c$5-g1. e5 формула: =c$5-$e9.

read (n);

i : = 1;

repeat

  writeln(i*i);

  i : = i + 1;

untill i*i > n

s: = str(number);

for : = 1 to length(s)  div 2 do

  if s[i] < > s[length(s) - i + 1] then writeln("не палиндром")ж