Ответы на вопрос:
2. Неполное:
If <условия>
then <действия>
Полное:
If <условия>
then <действия1>
Else <действия2>
3. б)
4. Составной оператор предназначен для объединения нескольких действий. Он имеет вид:begin
операторы
end;
В условном операторе составной оператор используется для описания нескольких действий: если истина — то составной оператор, если ложь то составной оператор.
Пример:
if a>o then
begin//начало составного оператора
a:=a+1;
b:=a-3;
end;//конец составного оператора
Так же принято называть составной оператор — блоком)
5 в прикрепленном
6 . Var x,a,b,c:integer;
begin
writeln ('введи трехзначное число');
readln (x);
c:=x mod 10;
b:=x div 10 mod 10;
a:=x div 100 mod 10;
if a=с then writeln ('Число является перевертышем')
else writeln ('число не является перевертышем');
if (a=b) or (a=c) or (b=c) then writeln ('да')
else writeln ('нет');
end.
7. var x1,x2,y1,y2:integer;
a,b:real;
begin
write ('Введите x1 и x2: ');
readln (x1,x2);
write ('Введите y1 и y2: ');
readln (y1,y2);
a:=sqrt (sqr (x1) + sqr (y1));
b:=sqrt (sqr (x2) + sqr (y2));
if a>b then writeln ('1-я точка ближе')
else writeln ('2-я точка ближе');
end.
8. Var a ,b,c :real;
Begin
Writeln (‘введите три числа’);
Readln (a,b,c);
If (a<b+c) and (b<a+c)and(c<a+b) then
Begin
If (a=b) and (a=c)and (b=c) then Writeln (‘ треугольник равносторонний’)
Else begin
If (a=b)or(a=c)or(b=c) then Writeln (‘треугольник равнобедренный’)
Else Writeln (‘треугольник разносторонней’);
End;
End
Else Writeln (‘треугольника с заданным сторонами не существует’);
End.
Объяснение:
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Другие предметы
-
lenaivashenko1601.01.2021 04:18
-
Rabika201818.05.2020 20:16
-
Dianablac24.10.2021 18:01
-
gulsaakamaeva31.05.2023 09:05
-
Mishgan2121.01.2022 23:20
-
ляля36306.11.2020 10:02
-
fokusPrise31.07.2021 12:22
-
julia07120107.06.2023 16:05
-
Igorkhvan09.02.2020 22:35
-
Belatrissa1127.08.2022 16:14
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.