(отмечу лучшим)
ввести натуральное число вывести квадраты и кубы всех чисел от 1 до этого числа
на паскале пример:
1: 1 1
2: 4 8
3: 9 27
Anrehah
3
24.02.2020 23:52
3
Другие вопросы по теме Информатика
vladagabriell
02.08.2019 03:10
shedis2004
11.03.2021 06:45
missgur04
11.03.2021 06:48
Zemskikh
12.08.2019 21:30
odin2323
30.09.2019 01:01
Абдешова98
25.07.2019 16:00
manshev2018
26.06.2019 16:50
vikamorgunova0
26.06.2019 16:50
Популярные вопросы
- Какие города оказали монголам ожесточенное сопротивление?...
2 - Соедини задачи если её решение ...
1 - ответ! решить завтра проверяют я не понимаю...
2 - Многообразие форм живых организмов.прослушать текст определи ключевые слова...
3 - К сумме чисел −1134 и −656 прибавь число, противоположное числу 123 (Смешанное...
1 - Если что цифры тоже надо делать!...
1 - Ужевпериодпервойопиумной захватчиков.Первымкрупным китайскогонародавэтот...
2 - Напишите небольшое сочинение, объясните приведенную ниже точку зрения некоторых...
2 - на одной Аллее было посажено кустов можжевельника в 2,5 раза больше чем...
3 - ҮЙ ТАПСЫРМАСЫ Сызба бойынша есеп құрастыр жәнеоны шығар.9t= 3 минV1 = 5...
3
program N_1;
uses crt;
var a,a2,a3:integer;
begin
writeln ('Введите натуральное число');
readln (a);
a2:= sqr(a);
a3:=a*a*a;
writeln (a, ': ', a2, ' ', a3);
end.