Добрый вечер! Необходимо написать 2 программы на языке Паскаль! 1) Вывести на экран квадраты натуральных чисел от n до m. При этом n больше m. Ввести с клавиатуры. 2) Вывести на экран степени целой величины x. Объявить степени...
Добрый вечер! Необходимо написать 2 программы на языке Паскаль!
1) Вывести на экран квадраты натуральных чисел от n до m. При этом n>m. Ввести с клавиатуры.
2) Вывести на экран степени целой величины x. Объявить степени longit
Заранее спасибо!
Гость
Ответ(ы) на вопрос:
Гостьготово........................
Гость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('n
Не нашли ответ?
Похожие вопросы