Program name;//Имя программы uses crt;//Запуск программы в консольном режиме НЕОБЯЗАТЕЛЬНО var a : Integer; b : Integer; i : Integer; c : Integer; BEGIN //Начало программы write('Введите 1 число: '); readln(a);//Ввод значения первого числа c := b-a-1; write('Введите 2 число: '); readln(b);//Ввод значения второго числа writeln(a, ' ' , b); //Вывод двух чисел writeln(a, ' ' ,a*a,' ' , a*a*a); // Вывод 1 числа, квадрата, куба for i := 1 to b-a-1 do begin a := a + 1; writeln(a, ' ',a*a, ' ', a*a*a); // Вывод всех чисел от a до b end; writeln(b, ' ' ,b*b,' ' , b*b*b);// Вывод 2 числа, квадрата, куба ReadKey; end. //Конец программы
#include <stdio.h>
#include <conio.h>
int main() {
int i, j = 1, a, b;
printf("Vvedite granici intervala:");
printf("\nVvedite a: ");
scanf("%d", &a);
printf("Vvedite b: ");
scanf("%d", &b);
for(i = a; i <= b; i++)
printf("%d\t%d\t%d\t\n",i, i*i, i*i*i);
printf("\n\n");
printf("Vivesti kvadrati i kubi sled. posl-ti: 1, 2, 4, 7, 11, 16...\n");
for(i = 1; i <= 46; i+=j++)
printf("%d\t%d\t%d\t\n",i, i*i, i*i*i);
getch();
}