Дмитрий_Пергамент669
Дмитрий_Пергамент669
11.07.2022
?>

Складіть програму, яка буде рахувати кількість введених з клавіатури речень​

Информатика
Ответить

Ответы

nuralievelsh
nuralievelsh
11.07.2022

Объяснение:

var i,n,kp,km:integer; a:char;

begin

kp:=0; km:=0;

readln(n);

for i:=1 to n do

begin

  readln(a);

  if a='+' then:=kp+1;

  if a='-' then km:=km+1;

end;

writeln(kp,' ',km);

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Складіть програму, яка буде рахувати кількість введених з клавіатури речень​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Михайлович Гуртовая929
Упрощение логических выражений. 10 класс.Добрый день, очень вас У меня выходит тройка по информатике, я по дополнительное задание, что бы исправить свою оценку. Но дело в том, что я не понимаю, к...
Автор: Михайлович Гуртовая929
makeeva-nataliya60
Почему роботы создаются по принципу живых организмов
Автор: makeeva-nataliya60
Chitaia
сделать таблицу в Ворде, расписание, и пришлите мне в ответе, заранее
Автор: Chitaia
sadinuraliev263
7. В не¬ко¬то¬ром ка¬та¬ло¬ге хра¬нит¬ся файл Оценки.doc. После того, как в этом ка¬та¬ло¬ге со¬зда¬ли под¬ка¬та-лог и пе¬ре¬ме¬сти¬ли туда файл Оценки.doc, его пол¬ное имя стало С:\Школа\Классы\9Б\...
Автор: sadinuraliev263
Aleksandr362
Саша работал с каталогом d: /уроки/информатика/практические работы.он поднялся на два уровня вверх, затем спустился в подкаталог и создал в нём файл квур.txt. каково полное имя файла, который созда...
Автор: Aleksandr362
ksankaaleks611
Задача 2: Скандинавский флаг На флагах скандинавских стран изображён крест, смещённый в левую сторону, как, например, на флаге Швеции. Пусть высота изображения флага равна n, длина равна m (см. р...
Автор: ksankaaleks611
gre4ka2004
Текстовый документ, состоящий из 20480 символов, хранился в 8-битной кодировке кои-8. этот документ был преобразован в 16-битную кодировку unicode.
Автор: gre4ka2004
Тарбаева1243
Вкладчик вносит вклад на депозит сумму на 6 лет под 12%
Автор: Тарбаева1243
sergeymartyn56
Составить программу определяющую лежит ли точка с заданными координатами (х, у) в заштрихованной области паскаль
Автор: sergeymartyn56
krasnova1977
Составьте программу которая запрашивает число x и определяет чётное или не чётное это число
Автор: krasnova1977
rodsher7740
Готовясь к соревнованиям, лыжник в первый день побежал 10 км, затем каждый день увеличивал расстояние на 10%. Сколько километров пробежал он за неделю тренировок? На какой день он пробежал больше 15...
Автор: rodsher7740
Svetlana1877
1)написать программу для нахождения значения переменной s по формуле: s=1+(1/2)++(1/n 2)сделать блок-схему.
Автор: Svetlana1877
tanya14757702
Вкажи коректно задані формули ExcelВибери всі правильні відповідіа) =F1:F3+G2:G4b) =7^7c) (X1+B2)*3d) =7*A2е) =A2*ТҮ7f) =A2*7​
Автор: tanya14757702
ognevasv555
Е.космические шахматы 11класс
Автор: ognevasv555
vapebroshop
Pascal дан двухмерный массив, нужно заменить первые k элементов на противоположные по знаку. ограничений нет, используйте сколько хотите переменных;
Автор: vapebroshop
▲