Несколько задачек на Паскале

[bwitcher]

Сообщение от Ol'ga_new

Работать должно, только можно при выводе первую i вынести из ковычек, что бы нагляднее было! (и ещё маленькая ошибочка цикл от а до 50!!!)

Да, так я тоже пробовал)
Моя программа:
Program MyProg;
Var
a,i:integer;
Begin
Writeln('Vvedite peremennuy a');
Readln(a);
for i:=a to 50 do
writeln(i,'^3 = ', i*i*i);
Readln;
End.

Потом в саму программу ввожу а, например, 45, он мне делает столбик от 45 до 50, но третьи степени этих чисел вычисляет неправильно! Пересчитывал на калькуляторе. А некоторые вообще почему-то отрицательными делает.

[Ol'ga_new]

Странно, попробуй добавить ещё одну переменную (для вычисления степени), а потом выводить её???

[alex_fcsm]

i:longint;

[bwitcher]

Сообщение от alex_fcsm

i:longint;

Вот, все, отлично! Спасибо огромное! Теперь работает точно как надо! Вот только такой тип переменной я первый раз слышу, у нас такого не было...)))

[Ol'ga_new]

Дело не в типе 50 в 3 степени 125000- вполне помещается в диапозон!

[alex_fcsm]

Полезно посмотреть

[bwitcher]

Сообщение от alex_fcsm

Полезно посмотреть

Да, точно. Спасибо еще раз за помощь!

[alex_fcsm]

Сообщение от Ol'ga_new

Дело не в типе 50 в 3 степени 125000- вполне помещается в диапозон!

Для Паскаля не подойдет - integer 2 байта всего

[bwitcher]

Люди, тут вот такая возня: я показал преподу решения, она прицепилась, что решено с циклом For. Оказывается, надо было через While или Repeat. Поможете?)))))
Вот задания:
1) Напечатать столбиком третьи степени всех чисел от а до 50 (значение а вводится с клавиатуры; а < 50).
2) Составить программу для расчета факториала натурального числа n (факториал числа n равен 1*2*3*…*n)
3) Распечатать в столбик таблицу умножения на число n (число n вводится с клавиатуры; 1 < n < 9)
4) Составить программу возведения натурального числа в квадрат, учитывая следующую закономерность:
1^2 = 1
2^2 = 1+3
3^2 = 1+3+5
4^2 = 1+3+5+7
………………………………….
N^2 = 1+3+5+7+9+…+2n-1

Заранее спасибо!!!

[Stilet]

я показал преподу

Показывай и нам Чем мы хуже то?