записать математическое выражение на языке Pascal ​

компьютер входит в состав бытовой техники.

компьютер является надсистемой для компьтерных программ.

в не указан   шаг изменения x , допустим он равен 1

var

x,y: real;

begin

x: =1;

while x< =10 do

begin

y: =1/x-5;

writeln(y: 8: 2);

x: =x+1;

end;

end.

8 битная кодировка => 1 символ занимает 8 бит.

2304*4 = 9216 символов на всех 4 страницах

9216*8 = 73728 бит занимают все страницы

73728/ 36.864 = 2 секунды

ответ: 2 секунды

var a: integer;

begin

  read(a);

  if a mod 3 = 0 then writeln('делится')

  else writeln('не делится');

  readln;

end.