Составить программу перевода КБ в байты от 1 до 10КБ с шагом 1
Составить программу перевода КБ в байты от 1 до 10КБ с шагом 1
Гость
Ответ(ы) на вопрос:
Гостьvar
i: integer;
begin
for i:=1 to 10 do
writeln(i, ' Кбайт = ', i*1024, ' байт');
end.
Бейсик
DIM I AS INTEGER;
FOR I:=1 TO 10
PRINT I*1024
NEXT I
Не нашли ответ?
Похожие вопросы