сложное условие завершения цикла

@SlavkA911 · Регистрация: 25.02.2016

Author24 — интернет-сервис помощи студентам

дана матрица А с 2 строками и 10 столбцами. Первый элемент каждого столбца рассматривается как диаметр внутренней, а второй – как диаметр внешней окружности кольца. в цикле печатать площади колец, начиная с кольца, представленного первым столбцом, заканчивая цикл, если (по ошибке) второй элемент какого-либо столбца оказывается меньше первого.

помогите написать программу на с++ пожалуйста!

Pascal

uses crt;
const n=2;m=10;
var a:array[1..n,1..m] of integer;
    i,j:integer;
    f:boolean;
begin
 writeln('A: ');
 for i:=1 to n do
  begin
   for j:=1 to m do
    begin
     if i=1 then 
     a[i,j]:=1+random(5)
            else 
            a[i,j]:=3+random(5);
     write(a[i,j]:7)
    end;
   writeln
  end;
 writeln('площадь:');
 i:=1;
 f:=true;
 while (i<=m)and f do
  begin
   if a[1,i]>a[2,i] then 
   begin 
   f:=false;
   writeln 
   end
       else 
          write(pi*(sqr(a[2,i])-sqr(a[1,i])):7:1);
   inc(i)
  end; 
 if not f then 
 writeln('второй элемент ',i-1,' столбца меньше первого');
 readln;
end.

	04.06.2016, 23:32

Опции темы