Дан прямоугольник со стороной А и площадью S найти вторую его сторону и периметр

Знания

Информатика

1 ответ:

DaniilVol10 [207]3 года назад

0 0

Ответ:

Объяснение:

1. $\frac{S-2A}{2}$ - вторая сторона прямоугольника.

2. $(\frac{S-2A}{2} * A) * 2$ - формула периметра прямоугольника.

Читайте также

2. Расшифруйте слово НУЛТХСЁУГЧЛВ, закодированное с помощью шифра Цезаря.

Dragn1911 [24]

это - Криптография !!!

0 0

4 года назад

1. Составить программу ввода величины времени суток t (0<=t<=24)и выдачи текста: "Вы уже проснулись?" - если t<10 "Не п

петро2810

Язык: Паскаль

var t: byte;
begin
readln (t);
if (t<10) then
writeln ('Вы уже проснулись?');
if (t=12) then
writeln ('Не пора обедать?');
if (t>=18) then
writeln ('Ещё не вечер!')
else
writeln ('Как работается?')
end.

0 0

4 года назад

Нельзя преобразовать тип integer к char. Как это исправить? Var F, L, R, S : char; a, b : integer; begin a :=0; b :=0; F :=1; L

Декстер разбор по...

//Не смотрел Ваш код, просто моё видение решения задачи
//PascalABC.NET 3.2 сборка 1318

Var
t:text;
x,y,i,j:integer;
s:string;
c:char;
world:array[1..4] of char=('E','S','W','N');
begin
j:=1;
c:='E';
assign(t,'input.txt');
reset(t);
read(t,s);
close(t);
i:=1;
while s[i]<>'S' do
begin
if s[i]='R' then
begin
if c='N' then j:=1 else inc(j);
c:=world[j];
end;
if s[i]='L' then
begin
if c='E' then j:=4 else dec(j);
c:=world[j];
end;
if s[i]='F' then
case c of
'E':inc(x);
'S':dec(y);
'W':dec(x);
'N':inc(y);
end;
inc(i);
end;
assign(t,'output.txt');
rewrite(t);
write(t,x,' ',y);
close(t);
end.

Пример содержимого input.txt:
FLFS
Пример содержимого output.txt:
1 1

0 0

3 года назад

Помогите пожалуйста придумать девиз об информатике 5 класс спасибо

A50kali5sis [20]

Информатике учится,
Будем вместе,детвора.
А пока-пока мы в школе,
Учат нас учителя.

0 0

3 года назад

7. Составить таблицу истинности для логического выражения (смотрит фото!!!)

nikita500 [4]

----------------------

0 0

4 года назад