Question

Составить программу перевода КБ в байты от 1 до 10КБ с шагом 1

Answer 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

Answer 2

Конечно нет, это паскаль. В задании где-то что-то сказано про бейсик?

Answer 3

а если я сейчас создам ещ' одно такое же  для  бейсика решишь?

Answer 4

Сейчас добавлю на бейсике ответ сюда.

Answer 5

спс тебе большое

Answer 6

Посмотри мой аккаунт ещё один там задачу решить надо тоже бейсик znanija.com/task/17030369