uses crt,graph; type mas=array[1..500] of Pointtype; var gd,gm,i,j,k,n:integer; a:mas; begin randomize; gd:=0; initgraph(gd,gm,''); for i:=1 to 500 do begin a[i].x:=random(getmaxX); a[i].y:=random(getmaxY); circle(a[i].x,a[i].y,2); end; k:=0;n:=0; repeat k:=k+1; delay(200); setcolor(0); for i:=1 to 500 do circle(a[i].x,a[i].y,2); for i:=1 to 500 do begin if a[i].y>getmaxY-n-10 then a[i].y:=1 else a[i].y:=a[i].y+3; if a[i].x<0 then a[i].x:=getmaxX else a[i].x:=a[i].x-1; end; setcolor(15); for i:=1 to 500 do circle(a[i].x,a[i].y,2); if k mod 20=0 then begin n:=n+1; line(0,getmaxY-n,getmaxX,getmaxY-n); end; until keypressed; readln end.
import java.util.Scanner; class Example{ public static void main(String args[]){ Scanner scn = new Scanner(System.in); int x = scn.nextInt(); int y = scn.nextInt(); System.out.print(x + " * " + y + " = " + y * x); //для простого вывода на экран ответа, стерите данную строчку, и вставьте такой код: "System.out.println(y * z);" } }
на паскале var a,b:integer; begin readln(a,b); write(a, ' * ', b, ' = ', a*b); //для простого вывода на экран ответа, стерите данную строчку, и вставьте такой код: "write(a*b);" end.
begin
writeln('x1');
read(x1);
writeln('x2');
read(x2);
if x1>x2 then
writeln(abs(x1-x2))
else
writeln(abs(x2-x1));
end.