Ответы на вопрос:
Program fgg; var x: real; begin write('введите х: '); readln(x); if x = 0 then writeln('ошибка. на 0 делить нельзя') else writeln('y=', sin(x) + 1 / x); end.
Var a,b,c,x: integer; begin write('введите трехзначное число. x='); readln(x); a: =x div 100; b: =(x mod 100) div 10; c: =(x mod 10) div 1; if (a=b) and (b=c) then writeln('верно! ') else writeln('не верно'); readln; end.
Популярно: Информатика
-
Серг4й20.02.2022 22:04
-
ЕкатериночкаI22.07.2022 02:42
-
vasikstrowb12.05.2021 22:30
-
palechov0107.06.2022 18:10
-
ivanovapolina8626.09.2022 12:01
-
12рок128.02.2020 14:25
-
aleksandrkozlov106.06.2022 04:06
-
millyby107.02.2021 15:50
-
лпк1822.05.2020 05:21
-
Amyy125.06.2021 18:03