Ответы на вопрос:
Допустим символы вводятся до символа "." - точка. точку в количество включать не будем var i,j: integer; s: array[1..255] of char; begin while s[i]< > '.' do begin read(s[i]); inc(i); end; writeln(i); for j: =i downto 1 do write(s[j]); end.
Популярно: Информатика
-
Ulysses22805.10.2022 20:38
-
МастерХ21.04.2022 04:17
-
Anastas1ya111.12.2020 10:14
-
amina203140618.03.2022 04:00
-
AngelinaMois05.12.2020 09:51
-
Nora369828.12.2022 21:04
-
patokina02107.10.2022 15:09
-
Steyflie18.12.2022 08:11
-
MATVEYPRO2626.01.2022 21:30
-
Nasta1111111235605.10.2022 17:54