Var t,n:integer;
begin
n:=1;
t:=3;
writeln('t','n':6);
while t<25 do
begin
n:=n*2;
writeln(t,n:6);
t:=t+3;
end;
readln;
<span>end.</span>
VB.
Dim i As Integer
Dim Massiv() As Integer
For i = 0 To Massiv.Length - 1
Massiv(i) += 4
<span>Next</span>
Ответ:
Достаточно
Объяснение:
Видео 1,44 гб = 1475 мб
Фотографии - 370мб
Текст 970 кб = 0.9473мб
Презентация - 190мб
Флешка 2гб, значит должно получиться 2048
Считаем: 1475+370+190+0,95=2 035,95 мб, что меньше числа 2048. Значит хватит
В задание должны быть варианты расстановки символов азбуки Морзе, ты их не привёл(-а), так что решить это невозможно.
Тут будет 57^10.....................................................