Выражение A=′фрукт′A+′ы′=′фрукты′ —

строковое
логическое
арифметическое

Выражение строковое, потому что идут операции с символами.

Логическое выражение может принимать значения только 0 и 1.

Арифметические выражения выполняются с цифрами.

program first;

var z,d,k: integer;

begin

writeln('input z,d,k');

readln(z,d,k);

if (d> =z) then

d: =d-z

k: =k+1

writeln(d,'    ',k);

readln;

end.

  var a,b,c,d: integer;

begin

writeln ('vvedite a');

  read(a);

writeln ('vvedite b');

  read(b);

writeln ('vvedite c');

  read(c);

writeln ('vvedite d');

  read(d);

if (a> b) and (a> c) and (a> d)  then writeln('samoe bolshoe chislo - a')

  else writeln('a ne samoe bolshoe');

end.