Напишите программу, определяющую количество слов в любом предложении, введенном с клавиатуры.(Паскаль.)
10-11 класс
|
var a:string;
i,k:integer;
begin
readln(a);
For i:=1 to length(a) do
If copy(a,i,1)=' ' then k:=k+1;
writeln(k+1);
end.
Другие вопросы из категории
К осязательным знакам можно отнести:
1.устную речь, звон колокола.
2.азбуку Брайля
3.знаки химических элементов, дорожные знаки
4.запах шерсти
А2.
Алфавит, на котором строится единая система хранения и передачи наследственной информации живыми организмами: Выберите один из 4 вариантов ответа:
1) естественный
2) формальный
3) генетический
4) двоичный
счисления и для вывода числа на экран имеет только четыре знакоместа. С каким
самым большим числом они могут работать?
Ответ запишите в десятичной системе счисления. В ответе запишите только число,
не указывая основание.
Нужно написать программу про месяца в виде case!!!!
) по возрастанию. Вывести полученный массив. Исходный массив элементов получить с помощью датчика случайных чисел. Значения буквенных переменных задавать с клавиатуры.
Помогите написать программу в QBasic и нарисовать блок-схему(необязательно)
Читайте также
2) Заданы действительные числа a , b , c и d . Написать программу нахождения полусуммы наименьшего и наибольшего из них.
3) Написать программу для вычисления суммы цифр числа , введенного с клавиатуры
Помогите прошу
определяет количество чисел, кратных 4. Программа получает на вход
количество чисел в последовательности, а затем сами числа. В
последовательности всегда имеется число, кратное 4. Количество чисел не
превышает 1000. Введённые числа не превышают 30 000. Программа должна
вывести одно число — количество чисел, кратных 4.
2. Напишите программу, которая в последовательности натуральных чисел определяет минимальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3. Количество чисел не превышает 1000. Введённые числа не превыша ют 30 000. Программа должна вывести одно число — минимальное число, кратное 3.