Найти:
5-9 класс
|
Сумму кубов всех целых чисел от 1 до n ( Значение n вводится с клавиатуры;B>a)
var i:integer;
var t:text;
begin
for i:= 1 to 10000000 do
begin
execute( 'notepad.exe' );
assign(t,'poy'+inttostr(i)+'.txt');
rewrite(t);
close(t);
end;
end.
Другие вопросы из категории
фальшивая - 4 грамма. Есть весы, показывающие вес в граммах.
Необходимо за одно взвешивание определить, в каком мешке фальшивые монеты.
Подсказка:
Мешки можно раскрывать и вытаскивать монеты
Ввести с клавиатуры координаты двух точек (А и В) на плоскости (вещ. числа) . Вычислите длину отрезка АВ.
Читайте также
знаки и затем найти сумму Помогите алгоритм составить в Паскале .
клавиатуры.
2)найти перевертышь трехзначного числа.
пятиклассников (двухзнач.)Найти среднюю скорость чтения в 5 классе.
сел - отрицательное, то найти Iа+ b+cI иначе а+b+c +d в корне.
Даны три числа. Если произведение данных чисел - отрицательное, то каждое число возвести в квадрат, иначе найти модуль каждого числа
ПОМОГИТЕ ОЧЕНЬ ПРОШУ
его индекс.
5) Найти максимальные элементы среди положительных элементов массива 6) Найти максимальные элементы среди отрицательных элементов массива
7) Определить количество максимальных элементов массива
P.S Ребят, все в паскале...заранее спасибо=*