N=6 While n>1
S=2
n-=1
print(s)
Выполните трассировку выполнения алгоритма
8 класс

Ячейки образуются на пересечении столбцов и строк электронной таблицы. Каждая ячейка имеет имя, которое состоит из названия столбца и номера строки (например, В7, Е34, H13). Активной называется выделенная жирной рамкой ячейка, в которой осуществляется ввод или редактирование данных.

Осередки утворюються на перетині стовпців і рядків електронної таблиці. Кожна осередок має ім'я, яке складається з назви стовпця і номера рядка (наприклад, В7, Е34, H13). Активною називається виділена жирною рамкою осередок, в якій здійснюється введення або редагування даних.

{ s(трапеции) = ((a+b)/2)*h; }
uses crt;
var
a, b, h: Integer; (Real)
s: Real;
begin
WriteLn('Введите а: ',a);ReadLn(a);
WriteLn('Введите b: ',b);ReadLn(b);
WriteLn('Введите h: ',h);ReadLn(h);
s:= ((a+b)/2)*h;
WriteLn('S = ', s);
ReadLn;
end.
Если же а и б должны быть обязательно меньше h, то:
if (a < h) and (b < h) then
begin
WriteLn('Введите а: ',a);ReadLn(a);
WriteLn('Введите b: ',b);ReadLn(b);
WriteLn('Введите h: ',h);ReadLn(h);
s:= ((a+b)/2)*h;
WriteLn('S = ', s);
ReadLn;
end;
else begin
WriteLn('Основания не меньше h!');
ReadLn;
end;