1. Бабушка Ефросинья решила свои 50000 рублей положить на вклад с ежемесячной капитализацией под 10% годовых. Ежемесячно она докладывает по 2 тысячи (кроме последнего месяца). Сколько денег она получит через год 2. Сортировка это… *
а) расстановка данных в определенном порядке
б) отбор записей или выполнение других операций с данными
в) отбор данных удовлетворяющих выбранному условию
3. Какой объем графического изображения необходим для хранения 4 страниц изображения при условии, что разрешающая дисплея равна 720*480 пикселей, а глубина цвета =32?

германия

испания

португалия

франция

чехия

var

a: [1..100] array of integer;

i,n,p: integer;

begin

readln(n);

for i: =1 to n do

begin

readln(a[i]);

p: =2;

while (p*p< =a[i]) do

begin

if p*p=a[i] then writeln (a[i],' полный квадрат')

p: =p+1;

end;

end;

end.

1)f0=(15*16^1)+(0*16^0)=240 (10 c.c), делим столбиком число 240 на 2 (и так далее продолжаем делить на 2 все частные числа) и записываем остатки с конца и получаем число 11110000(2 c.c)

2)1d4=(1*16^2)+(13*16^1)+(4*16^0)=256+208+4=468 (10 c.c), делим столбиком число 468 на 2 (и так далее продолжаем делить на 2 все частные числа)и записываем остатки с конца и получаем число 111010100 (2 c.c).

var x1, x2, x3, y1, y2, y3, p: real;

function len(x1, y1, x2, y2: real): real; begin len : = sqrt(sqr(x2 - x1) + sqr(y2 - y1)); end;

begin readln(x1, y1, x2, y2, x3, y3); p : = len(x1, y1, x2, y2) + len(x1, y1, x3, y3) + len(x2, y2, x3, y3); writeln(p: 8: 3); end.