В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
daa86
daa86
01.05.2020 17:40 •  Информатика

Тут в принципе просто исправить программу​

Показать ответ
Ответ:
sonyavolkova26
sonyavolkova26
22.08.2022 08:11
Смотри. Высказывание F-истинное, обозначим 1
Высказывание С-ложное, обозначим 0
я насчет 1 не особо уверенна, начну со 2
2) знак И. значение истинно только тогда, когда оба значения истинны, но так как С высказывание ложно, то отсюда следует все высказывание ложное
3) тоже знак И. этот знак может записываться & или and или *
опять ложное
4) это наверно знак кхора, плюсик в кружочке, тогда истинно будет высказывание когда одно из выражений истинно, а у тебя F-истинное, значит все выражение истинно.
ну как-то так, но я не уверена
0,0(0 оценок)
Ответ:
Батыр100
Батыр100
20.02.2020 16:38
//Pascal
//Файл fileText.txt должен быть в папке с программой

const
  Vowels = ['e', 'u', 'i', 'o', 'a', 'y', 'E', 'U', 'I', 'O', 'A', 'Y'];
var
  t: text;
  s: char;
  n, min, mult, mult2, count, count2: integer;
begin
  Assign(t, 'fileText.txt');
  Reset(t);
  n := 0; min := 0; mult := 1; count := 0;
  while not eof(t) do
  begin
    count := count + 1;
    while not eoln(t) do
    begin
      read(t, s);
      if s in Vowels then
        inc(n);
      if s in ['0' .. '9'] then
        mult := mult * (Ord(s) - 48);
    end;
    if n > min then
    begin
      min := n;
      mult2 := mult;
      mult := 1;
      count2 := count;
    end;
    readln(t);
    n := 0;
    mult := 1;
  end;
  Close(t);
  write(count2, ' строка. ');
  write('Произведение = ', mult2, '. ');
  writeln('Гласных = ', min);
  readln;
end.

Программа на языке pascal: в текстовом файле найти строку, содержащую слово с наибольшим числом глас
Программа на языке pascal: в текстовом файле найти строку, содержащую слово с наибольшим числом глас
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота