Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
прогоняем числа от 10 до 99 в цикле, учитываем при выводе отрицательные числа.
на tpascal:
var i: integer;
begin
for i: =10 to 99 do begin
if i mod 3 = 2 then
writeln (i,' ',-i,' ');
i: =i+1;
end;
readln
end.
синий,желтый,красный,зеленый,оранж.
var x,s,n: integer;
repeat
read(x);
if x< 0 then n: = n +1;
if x > 0 then s: =s+x;
until x=0;
writeln(n,s);
16-битной кодировке unicode.
один символ s =16 бит
количество бит текстового файла к= 51200 бит/с * 10 с= 512000
количество символов к/s=512000/16 =32000
Популярные вопросы