Var a, b: integer; begin write('граница а? '); readln(a); write('граница б? '); readln(b); for var i:=a to b do writeln(i, ': ', sqr (i), ' ', i*i*i); end.
#include <iostream> using namespace std; int main() { int A,B,C; cin >> A >> B >> C; for(int i = A; i <= B; i++) {if(i % C == 0) cout << i << " ";} return 0; }