Дано трехзначное число а,если вторая цифра числа четная,то ее заменить на ноль
157
220
Ответы на вопрос:
Program z; var n,a,b,c: word; begin writeln('введите число'); readln(n); a: =n mod 10; n: = n div 10; b: = n mod 10; n: = n div 10; c: =n; if b mod 2 = 0 then b: =0; writeln(c,b,a); end.
Популярно: Информатика
-
ndjfhfidi19.01.2022 20:15
-
vitaska1971oz3tq322.01.2022 20:25
-
alibaevaalina14609.01.2021 17:13
-
azovska55201.02.2021 15:45
-
kulaevmasya13.05.2020 02:54
-
Biglok14.07.2022 23:01
-
erfsdgfRyde19.09.2020 04:51
-
ЯнаZL12.09.2022 17:43
-
kotsdanil77819.06.2023 14:57
-
друг3208.11.2020 01:56