Сколько времени потребуется для ввода в память компьютера текста романа А. С. Пушкина «Евгений Онегин», состоящего из 380 страниц, с сканера и программы для распознавания текстов, если известно, что на сканирование одной страницы уходит 5 секунд, на смену страницы в сканере – 5 секунд, на распознавание страницы – 3 секунды? ответ дать в минутах

линейный (следования)

разветвляющийся (развилка)

циклический

var  s: string;   i: longint; begin  readln(s);   for i: =length(s) downto 1 do  begin  if s[i]=' ' then delete(s,i,1);   if (s[i]> ='1')and(s[i]< ='9') then delete(s,i,1);   end;   writeln(length(s)); end.

  держи:

program kk; uses crt; var a: array [1..5,1..5] of integer; i,j: integer;   beginclrscr; randomize; for i: =1 to 5 dobeginfor j: =1 to 5 doa[i,j]: = random(90)+10; end; for i: =1 to 5 dobeginfor j: =1 to 5 do write(a[i,j],' '); writelnend; writeln; writeln; for i: =1 to 5 dobeginfor j: =1 to 5 dobegin  if (a[i,j] > 0) and (a[i,j] mod 3 = 0) thenbeginwriteln(a[i,j],' [',i, ',',j,']'); end; end; end; readkey; end. 

1) program imja_program

2) var imja_peremennoj: tip_peremennoj

3)integer,byte,real,long, short и еще какие-то но вряд ли будешь их использовать

более подробно смотри в википедии