Напишите пожалуйста такие вот проги....буду очень благодарен... |
Начальные контакты ТОЛЬКО через личку!!
Напишите пожалуйста такие вот проги....буду очень благодарен... |
Незнайка((( |
12.05.2011 23:25
Сообщение
#1
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Реальное имя: Дима Репутация: 0 |
6) Задано трицифрове число. Визначити добуток його цифр.
3)Задано трицифрове число. Определить, какая цифра в этом числе есть больше - первая или последняя. 12)Определить количество предложений в заданном фрагменте текста. |
-programist- |
2.01.2013 21:14
Сообщение
#2
|
Гость |
var s:string; i,k:integer;
begin readln(s); k:=0; for i:=1 to length(s) do if s[i] in ['.','?','!'] then inc(k); writeln(k); end. |
Текстовая версия | 27.04.2024 22:07 |