Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program kvadrat;
var i : integer;
begin
for i: = 10 to 100 do
writeln ( i: 2, i*i : 5);
readln;
end.
на пиксель приходится 512*8/32²=4 бита. 2^4=16 цветов.
1.что можно делать в школе?
бегать, ходить,играть,учить,узнавать. и тд.
2. в школе есть:
книга, библиотека , стены,кабинеты, и тд.
program nn;
uses crt;
var a: array [1..20] of real;
t: real;
i,n,min: integer;
{ввод последовательности, это самостоятельно}
min : = 1;
for i : = 1 to 20 do
if a[i] < a[min] then
min : = i;
end;
t : = a[min];
a[min] : = a[20-n];
a[20-n] : = t;
Популярные вопросы