Что пропущено в программном обеспечении на рисунке 64? нарисуйте схему в текстовом редакторе word и заполните ее записав вместо вопросительных знаков ответы в прямоугольниках. напишите какие можете в word
не писать
40 ​

программа №4program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end.

№5program p_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе') end.  

2гбайта=2000000байт

2000000байт/400байт=5000текстовых файлов

0.27 - 0.09 = 0.18

или

27/100 - 9/100 = 18/100

var a: array [1..100] of integer;

i,n: integer;

s: string;

begin

  randomize;

  for i : =1 to 100 do

  begin

      a[i]: = random(1000)+1000;

      a[i]: =a[i] mod 100;

      a[i]: =a[i] div 10;

      if a[i] mod 2 = 0 then n=n+1;

  end;

  writeln(n);

end.