Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
A01AA0
27.07.2020 17:19 •
Информатика
Составить программу вычисления стоимости рекламного текста,если 1 слово стоит 50 тенге
Показать ответ
Ответ:
FinSpb
02.10.2020 03:30
Решил)
Easy
var
s:string;
c:integer;
begin
readln(s);
while pos(' ',s)<>0 do
begin
c:=c+1;
delete(s,pos(' ',s),1);
end;
writeln((c+1)*50,' Tenge');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Brauberg898117
17.09.2022 12:43
Суперкомпьютер это тоже относиться к персональным?...
dina2607
17.09.2022 12:43
Растровый графический файл содержит цветное изображение с 64-ю градациями цвета и размером 160*50 точек. каков информационный объем этого файла в мбайтах?...
NastyaMishacheva
20.07.2021 07:34
Выполнив какую команду, можно создать новый цвет в палитре...
LamanAchverdiyeva
20.07.2021 07:34
Старший лом старательный ученик. чтобы порадовать капитана,он выучил морскую семафорную азбуку,в которой каждая буква кодируется определенным положением рук с флажками....
ваня10001
16.02.2020 16:35
2) Найдите сумму чисел в двоичной системе счисления, выполните проверку a) 10+10b) 10+11c) 11+1d) 11+11e) 100+10f) 100+100g) 1101+111h) 1001+110i) 1010+11j) 1111+11k)...
kirill994
05.10.2022 20:54
Какие равенства или неравенства являются высказываниями? Укажите один или несколько правильных вариантов ответа: x y. x+y=z. 8:2 5. 5) x2+y2=25. 26-7=18....
12345678910АБ2261784
02.06.2022 01:44
Ps://onlinemektep.net/schedule/lesson/58c660a7-9fed-4a42-a5ac-2ef33720ee8a Верно ли указан порт датчика цвета в предложенном программном коде?бзор урокаLEGO MONOSTOR...
the26
07.04.2022 04:28
решить получить результат в восьмеричной системе счисления 45(16)+223(5)*1001(2) в скобках система счисления...
Sezimka1111
28.01.2020 18:18
Среди двузначных чисел 25, 37, 56, 91 числом с максимальной суммой цифр является...
krasnikovanastoyhpaj
09.05.2023 21:29
Составить блок-схему и программу, вычисляющую р=х2+10, если х 0. Pascal ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Easy
var
s:string;
c:integer;
begin
readln(s);
while pos(' ',s)<>0 do
begin
c:=c+1;
delete(s,pos(' ',s),1);
end;
writeln((c+1)*50,' Tenge');
end.