Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1)
s : = 0;
for i : = 1 to k do
begin
if i mod 2 < > 0 then
s: = s + i;
end;
2)
for i : = 5 to 55 do
writeln(i);
3)
s : = 1;
for i : = n to m do
s: = s * i;
4)
for i : = 10 to 15 do
обрамления там везде одинаковые
var i: integer;
for i: =1 to 1000 do
if i mod 2 = 1 then writeln(i*i*i);
end.
на египетскую
вавилон-клинопись
финикия-подобие букв без гласных
египет-иероглифы
15 гб = 15360 мбайт = 122880 мбит
32 мин = 1920 с.
скорость = 122880/1920 = 64 мбит/с
Популярные вопросы