Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
в блок схемах не сильна
var n: integer;
s,s0: real;
begin
n: =1;
s: =10;
repeat
n: =n+1;
s: = s + (100+p)*s0/100;
s0: =(100+p)*s0/100;
until s> 200;
writeln(s);
end.
640*350=224 000 пикселей 224000*2=448 000 пикселей на 2-х страницах. 16 цветов - 4 битный цвет, то есть 2 пикселя занимают 1 байт. 448000/2=224 000 байт = 1 792 000 бит = 218,75 кб
1. старший - коля, средний - ваня, младший - саша.
unit math;
program chisla;
var
a: array[1..20] of intteger;
i,s: integer;
s: =0;
for i: =1 to 20 do begin
a[i]: =randomrange(-5,1);
write(' ',a[i]);
s: =s+a[i];
end;
readln;
writeln('сумма элементов массива= ',s);
Популярные вопросы