Pascalabc не позволяет считать столь большие числа, но если бы он позволял делать это, то следующий код работал бы: program z1; vara, i: longint; begina : = 1; i : = 10000; while (i < 100001) dobegina : = a * i; i : = i + 2000; end; writeln(a); end.
Спасибо
Ответ дал: Гость
а)характеристика конфеты-сладкая,вкусная,твердая, является пищей. б)характеристика компьютера-электроприбор,много комплектующих, подходит для работы и игры.
Популярные вопросы