Регистрация
hlamshtein
20.05.2022 10:16
Информатика
Есть ответ 👍

Прошу вас паскаль
1. написать программу, которая вычисляет количество положительных элементов одномерного массива. массив из 17 вещ. элементов
2. написать программу, которая вычисляет сумму модулей элементов одномерного массива, расположенных после первого элемента, равного нулю. массив из 17 целых элементов​

129
155
Посмотреть ответы 1

Ответы на вопрос:

дангалах
дангалах
4,6(14 оценок)
//предполагается что слова разделены пробелами //предполагается что слово - это любой набор символов без пробела var       f: text;       s: string;       i, k: integer; begin       readln(s);       k : = 1;       for i : = 1 to length(s) do               if s[i] = ' ' then k : = k + 1;       assign(f, 'file.csv');       rewrite(f);       writeln(f, k, ',');       close(f);             writeln(k); end.

Популярно: Информатика