Автоматизированный прибор производит 20 измерений в секунду. Запись каждого измерения занимает 1 байт информации. Какой объем памяти потребуется компьютеру для записи измерений, сделанных за 1 минуту? *

1 секунда = 20 измерений

1 измерение = 1 байт

1 секунда = 20 * 1 = 20 байт

То есть за 1 секунду будет занято 20 байт

В 1 минуте = 60 секунд

60 секунд * 20 байт = 1200 байт

ответ: 1200 байт

program xxx;

var a,s : string;

    i: integer;

begin

    writeln ('введите слово и символ-');

    readln (s,a);

    for i: =1 to length(a) do

        if copy (s,i,1)=a then writeln (i);

    readln

end.

program zadacha2;

  uses crt;

  var i,n,a: integer;

            b,y,c,l: real;

begin

clrscr;

readln(n);

  a: =1;

  b: =2;

  c: =5;

  for i: =1 to n do                                                                                          

                                                                                                  begin  

if a mod 2 = 0 then

l: =a+b/c

else          

l: =a-b/c;

a: =a+1;

b: =b+2;

c: =c+5;

y: =y+l;

                                                                                                    end;

writeln(y: 2: 2);

readkey;

  end.

первую по подробней расспишите