Добрый вечер! Необходимо написать 2 программы ** языке Паскаль! 1) Вывести ** экран...

Question

Добрый вечер! Необходимо написать 2 программы на языке Паскаль!
1) Вывести на экран квадраты натуральных чисел от n до m. При этом n>m. Ввести с клавиатуры.
2) Вывести на экран степени целой величины x. Объявить степени longit
Заранее спасибо!

Answer 1

Готово........................

Comments

Спасибо!)

Answer 2

Var n,m,i:integer;
begin
writeln('n=');
readln(n);
writeln('m=');
readln(m);
if n>m then begin
for i:=m to n do
writeln (i,' в квадрате равно ',i*i);
end
else
writeln('nend.