Задать вопрос!

Задать вопрос!

Все категории

Иван1024 [14]

1 год назад

6

Даны стороны треугольника abc определить является ли треугольник равнобедренным.

Составте блок-схему

Информатика

1 ответ:

Serega2727 [130]1 год назад

0 0

Var a,b,c:real;
begin;
readln(a);
readln(b);
readln(c);
if (a=b) or (b=c) or (a=c) then writeln('Yes') else writeln('No');
end.

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

Укажите пары объектов, о которых можно сказать, что они находятся в отношении «объект – модель»: a)клавиатура – микрофон b)река

ИраЛенточка

B,c,d легкое задание ;)

0 0

4 года назад

Запиши десятичное число 1455 в системе счисления с основанием 7.

Lollipop9892

Чтобы перевести число из десятичной в любую другую систему счисления (СС), нужно данное число делить на основание нужной СС.

Решение смотри во вложении.

0 0

3 года назад

№1 1. Запишите команду, увеличивающую значение переменной x на 5. 2.Запишите команду,возводящую значение переменной x в квадрат.

John2388 [1.9K]

1)X:=x+5
2)X:=sqr(x)
3)x:=x/2
4)x:=2x
Прога
Var s,a:integer;
begin
readl(a);
s:=sqr(a);
wrtiteln(a);
end.

0 0

4 года назад

Преобразовать число 111011² в восьмеричную систему счисления:A) 56; B) 46; C) 73; D) 65.

Олег Бор

111011(2)=2^5+2^4+2^3+2+1=36+16+8+2+1=59(10)

59(10)=>x(8)
59/8=7(3)
7/8
59(10)=73(8)
Ответ: C

0 0

4 года назад

Написать программу для решения задачи. Вводятся две строки символов. Определить, которая из них больше.вот пример:Var _______:st

lamoll

Можно даже немного короче:
var:
s1,s2:string;
begin
  writeln('Vvedite pervyu stroky');
  readln(s1);
  writeln('Vvedite vtoryu stroky');
  readln(s2);
if (Length(s1))>(Length(s2)) then
  writeln('Pervaya stroka bolshe,chem vtoraya')
else
  writeln('Vtoraya stroka bolshe,chem pervaya');
  readln;
<span>end.

Проверял - всё работает, ошибок нет.</span>

0 0

4 года назад