Определите задачу пиктограммы (Прямоугольник), расположенной на панели инструмен- тов программы Paint: а) рисует правильный четырехугольник; б) отмечает область в форме четырехугольника; в) произвольно отмечает область; г) закрашивает отмеченную область

#include <iostream>

int main()

{

   setlocale(LC_ALL, "rus");

   double r1, r2, r;

   int connection;

   std::cout << "r1=";

   std::cin >> r1;

   std::cout << "r2=";

   std::cin >> r2;

   do {

       std::cout << "Выберите тип подключения (1-последовательно, 2 параллельно): ";

       std::cin >> connection;

   } while (connection != 1 && connection != 2);

   if (connection == 1) r = r1 + r2;

   else r = r1*r2/(r1 + r2);

   std::cout << "Результат r=" << r;

}

var a,b,c,s:integer;

begin

read(a);

read(b);

read(c);

s:=(a+b+c) mod 3       mod вробная часть от деления

end;

 

var post,Bes:real;

begin

read(post);

Bes:=post-100;    (кг)=(рост(см) - 100

end;

 

 

 

var m,n,k:integer;

begin

read(m);

read(n);

read(k);

o:=m*2+n*0+k*1

end;

 

 

 

 

var x:integer;

begin

read(x);

if x mod 2 =0 then write('чот') else write('нечет');

end;

 

 

 

var x:integer;

begin

read(x);

if x mod 10=7 then write('на конце 7') else write('не 7');

end;

 

 

 

///write(x) выводит значение переменой;