Добавить условие

08.11.2014, 16:13. Показов 604. Ответов 0

Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам

Помогите. Нужно добавить условие : сумма цифр числа должна быть меньше 10:

Pascal

begin
       S:=1;
        {$i-}
       reset(F);
       {$i+}
       if FileExists('first.dat')=false
       then begin
                 write('Файл уже существует');
                 close(F);
                 exit;
       end;
       writeln('Содержимое файла');
       while not eof(f) do
       begin
            read(f,x);
            write(x:6:2,'  ');
            s:=x*x;
            write(' ',s:6:2);
       end;
       close(f);
end;

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

08.11.2014, 16:13

Ответы с готовыми решениями:

Вывести на экран "условие выполняется", если все элементы массива положительные и "условие не выполняется", если это не так.
1)Тип массива вещественный.Число элементов 11. Вывести на экран "условие выполняется", если все...

Добавить условие
У меня есть таблица значений, тут я считываю последнюю строчу но у меня проблему мне надо вывести...

Добавить условие в функцию
Всем доброго дня! У меня есть сайт, задача была интегрировать с CRM. Нашел в интернете скрипт, все...

Добавить условие в функции
По заполненной экзаменационной ведомости (таблица: фамилия студента – оценка на экзамене) создать...

	08.11.2014, 16:13

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

08.11.2014, 16:13

Помогаю со студенческими работами здесь

Условие не получается добавить
Вычислить и вывести на экран в виде таблицы значения функции F на интервале от Хначала до Хконца с...

Добавить в программу условие
Добавить условие: Если пользователь введёт числа так, что среди них нельзя будет определить два...

Добавить условие в Case
Составить программу, которая в зависимости от порядкового номера дня месяца выводит па экран его...

Добавить правильное условие
есть код от Puporev'a можно ли добавить условие,что бы когда картинка была в координатах (x,y) то...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Наверх