Периметр вычисляется как а * б строны
В эксель
формула " =2*(A1+B1) "
Вводишь в ячеки А1 и B1 соответсвующие значения а в С1 вставляешь эту формулу: =2*(A1+B1) и все
Var x,s:integer;
begin
ReadLn(x);
while (x>0) do begin
s+=x;
x-=1;
end;
WriteLn(s);
end.
Браузеры Программы, с помощью которых просматриваются гипертексты в системе Всемирной паутины, называют
<u><em>Microsoft qBASIC:</em></u>
DIM n AS LONG
CLS
INPUT "Введите число ", n
INPUT "Введите цифру для поиска ", d
flag = 0
DO WHILE n > 0 AND flag = 0
IF d = n MOD 10 THEN
PRINT "Цифра в числе есть"
flag = 1
ELSE
n = n / 10
END IF
LOOP
IF flag = 0 THEN PRINT "Цифры в числе нет"
END
<em><u>Тестовое решение:</u></em>
Введите число 5374012
Введите цифру для поиска 1
Цифра в числе есть