100_2 = 4
100_3 = 9
100_4 = 16
100_5 = 25
100_6 = 36
100_7 = 49
100_8 = 64
100_9 = 81
100_10 = 100
100_11 = 121
100_12 = 144
100_13 = 169
100_14 = 196
100_15 = 225
100_16 = 256
100_17 = 289
100_18 = 324
100_19 = 361
100_20 = 400
100_21 = 441
100_22 = 484
100_23 = 529
100_24 = 576
100_25 = 625
100_26 = 676
100_27 = 729
100_28 = 784
100_29 = 841
100_30 = 900
100_31 = 961
100_32 = 1024
100_33 = 1089
100_34 = 1156
100_35 = 1225
100_36 = 1296
Где этот грёбаный файл.Я ща его уделаю!!!!!!!
5.
Но будь внимателен! Для начала ты должен перевести Длину 1 рулона из метров в сантиметры. И ещё: вместо большой А в формуле нужно поставить Длину 1 рулона, а вместо большой B поставь ширину 1 Рулона
6. рулонов
Около 7 рулонов, но не забудь все метры перевести в сантиметры.
Уххх, сложные задачи. Где ты учишься что тебе такое задают?) Надеюсь, решил всё правильно.
//Больше всего проблем доставил звук
uses graphABC;
var
x , y : integer;
s : string;
begin;
x:= 1;
y:= windowheight-20;
s:= 'Важное сообщение';
while x<>windowwidth do
begin;
textout(x,y,s);
inc(x);
sleep(50);
clearwindow;
end;
system.Console.Beep(500,1000);
sleep(1000);
system.Console.Beep(500,1000);
<span>end.</span>