Есть ответ 👍

Ввести 2 числа с клавиатуры если первое число больше второго то вывести на экран квадрат первого иначе квадрат второго

247
388
Посмотреть ответы 2

Ответы на вопрос:


Program a; var x,y: integer; begin  writeln('введите два числа: ');   readln(x);   readln(y);       if x > y then    writeln(x * x)    else    writeln(y*y); end.
Boi11
4,4(14 оценок)

Uses graphabc;   const   w = 600;   h = 600;   function f(x: real): real; begin   f : = sqr(x); end;   var   x0, y0, x, y, xleft, yleft, xright, yright: integer;   a, b, fmin, fmax, x1, y1, mx, my: real;   begin   window.init(0, 0, 800, 500, clwhite);   window.isfixedsize : = true;   xright : = 590;   yright : = 590;   a : = -15;   b : = 6;   fmin : = -10;   fmax : = 20;   mx : = (xright - xleft) / (b - a);   my : = (yright - yleft) / (fmax - fmin);     x0 : = 380;   y0 : = 490;   x1 : = a;     while x1 < = b do   begin       y1 : = f(x1);       x : = x0 + round(x1 * mx);       y : = y0 - round(y1 * my);       if (y > = 10) and (y < = 590) then setpixel(x, y, clblack);       x1 : = x1 + 0.001 ;   end; end.

Популярно: Информатика