Ученик10
Опубликовано 7 лет назад по предмету Информатика от Ученик10


Составьте программу, которая осуществляет ввод в массив с клавиатуры размеров 5 файлов в байтах (от 100 до 9000 байт) и преобразует значения, превышающие 1024 байт, в килобайты. Результат выводится в строку.

  1. Ответ
    Ответ дан ivanpakalnishkis

    var

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

     i:integer;

    begin

     for i:=1 to 5 do read(a[i]);

    for i:=1 to 5 do write(a[i],' ');

    writeln;

    for i:=1 to 5 do if a[i]>=1024 then writeln(a[i] div 1024);

    writeln;

    end.

     

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц