Левко сів виконувати домашнє завдання і просидів за столом 2 години.
З них х хвилин він чухав потилицю і дивився у вікно, 2-
шукав у письмовому столі гумку, щоб стерти у підручнику з
англійської мови карикатуру на свого товариша, на
малювання якої він витратив перед цим у хвилин.
Решту часу Левко перекладав англійські слова. Скільки
слів він встиг перекласти, якщо переклад одного слова у
нього займае 5 хвилин?

var

i: integer;

a: array[1..20] of integer;

function fn(x: integer): integer;

begin

if x mod 10 = 4 then fn: =x div 2

else fn: =x;

end;

begin

for i: =1 to 20 do

readln(a[i]);

for i: =1 to 20 do

begin

a[i]: =fn(a[i]);

writeln(a[i]);

end;

end.

нет,так как это не текствовый документ ,а картинка,и компьютер читает отсканированный файл картинкой а не текстом!

program;

var

max,val: integer;

label

start, ends;  

begin 

max: =-50;

val: =50;

start:

if val> max then val: =val-10

if val=max then goto ends;  

goto start;  

ends:

end. 

вычислительный эксперимент — метод изучения устройств или процессов с моделирования. он предполагает, что вслед за построением модели проводится ее численное исследование, позволяющее «проиграть» поведение исследуемого объекта в различных условиях или в различных модификациях численное исследование модели дает возможность определять разнообразные характеристики процессов, оптимизировать конструкции или режимы функционирования проектируемых устройств. более того, случается, что в ходе вычислительного эксперимента исследователь неожиданно открывает новые процессы и свойства, о которых ему ранее ничего не было известно.