Решите пожалуйста!!!

Question

Решите пожалуйста!!!

---

Comments

паскаль?

Answer 1

Квадраты и кубы:
var a:integer;
begin
read(a);
writeln('Введите натуральное число');
for var i:= 1 to a do writeln(i, ': ', sqr(i), ' ', sqr(i)*i);
end.

гипотенкза:
var a,b:integer;
begin
write('Ввод');
readln(a,b);
writeln('Вывод ',sqrt((sqr(a)+sqr(b))));
end.

Comments

А цифры где? написано как в примере!!

---

цифры будут выводится сами на экране при вводе

---

исправил код, теперь будет выводится и текст. Например, введите натуральное число.

---

мне это не надо на компе писать надо на листке самому