1.Дано сторони прямокутника a i b. Знайти його пдощу S=a•b 2. Намалювати коло радіуса 22, жовтим кольором та квадрат зі стороною 30 зеленим кольором
110
466
Ответы на вопрос:
Предпоследняя строка. перед ('no'); должно быть write или writeln. var n, a, b, c, d: integer; begin writeln('vvedite chislo'); readln(n); a: =n mod 10; b: =n mod 100 div 10; c: =n mod 1000 div 100; d: =n div 1000; if (a=d) and (b=c) then write ('yes') else writeln('no'); end.
Популярно: Информатика
-
zmeya913.05.2021 21:09
-
kleyman20040427.02.2022 03:56
-
anna228po18.01.2020 22:03
-
Dasha123123200712320.03.2021 23:38
-
anyutarak0320.04.2022 06:01
-
mikayilmalik225.09.2020 01:50
-
malenkayakreyz07.06.2023 15:46
-
makarovanasta20123.10.2022 01:27
-
01Таня1008.03.2021 16:15
-
shulbert12.12.2022 17:44