Вопрос № 121113: Нужна помощь!
Вот в паскале отладил ассемблерную программу,и мне надо вывести на экран результаты решения.если а=1 или 0,то есть решение и я его вывожу,а если а<0 т.е. со знаком '-' решений нет.И я правильно никак не могу вывести у меня то вы...Вопрос № 121146: Здравствуй Эксперты!
У меня вопрос:
При помощи графики Паскаля создать движущийся объект по горизонтали (слева направо)?
..Вопрос № 121172: найти кол-во трёхзначных чисел,у которых сумма крайних цифр равна средней цифре...Вопрос № 121243: Уважаемые знатоки алгоритмов и кодов, выручайте!!! 1. Дана чтрока символов, содержащая слова. Определить количество слов, начинающихся с буквы а.
2. Дана чтрока символов, содержащая слова. Определить количество слов, имеющих четную длину....
Вопрос № 121.113
Нужна помощь!
Вот в паскале отладил ассемблерную программу,и мне надо вывести на экран результаты решения.если а=1 или 0,то есть решение и я его вывожу,а если а<0 т.е. со знаком '-' решений нет.И я правильно никак не могу вывести у меня то выводит решений нет,если а<0,а если a=>0
то выводит и результат и строку нет решений.Как мне правильно ее вывести?чтобы у меня при отриц а выводилось 'нет решения',а при дргих значениях выводилось 'f='
Заранее благодарен! Мой алгоритм в приложении,подкоректируйте плз вывод)
Приложение:
Отправлен: 31.01.2008, 23:38
Вопрос задал: AHAPX (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Nazar__D
Здравствуйте, AHAPX!
Можно попытаться пользоватся переменной типа boolean или ее примитивный аналог типа integer (или опять того же byte).
У вас нет проверки, исполнилось ли первое условие, когда проверяется второе. Для этого и испольхуется в моем примере переменная flag. Если при проверке второго условия flag будет равно единице, значит, уже был осуществлен первый вывод.
Вот как будто и все. Помог, чем мог)))
Приложение:
--------- Я - українець!
Ответ отправил: Nazar__D (статус: 3-ий класс)
Ответ отправлен: 01.02.2008, 01:52 Оценка за ответ: 5 Комментарий оценки: спс большое,что вновь помогли!
Отвечает: Coupler
Здравствуйте, AHAPX! Можно ввести еще одну метку после вывода строки 'net reweniy' и перепрыгивать туда, если решения уже найдены и выведены на экран.
Приложение:
Ответ отправил: Coupler (статус: Практикант)
Ответ отправлен: 01.02.2008, 04:48 Оценка за ответ: 5 Комментарий оценки: спс большое!!!
Вопрос № 121.146
Здравствуй Эксперты!
У меня вопрос:
При помощи графики Паскаля создать движущийся объект по горизонтали (слева направо)?
Отвечает: Boriss
Здравствуйте, Ампилогов Алексей Анатольевич!
Вот так это можно сделать. Только, ессно, качество будет невысоким - дергается - что с него возьмешь - DOS
Алгоритм работы: делаем активной страницей 1-ю (по умолчанию 0). На ней что-то рисуем и запоминаем в p: pointer; Делается это для того, чтобы никто не видел , возможно, долгого рисования.
Затем возвращаемся на активную нулевую страниц и на ней:
1) помещаем запомненное изображение с параметром NormalPut;
2) выжидаем немного;
3) опять помещаем то же изображение в то же место, но с параметром XORPut. При этом все, что было одинаковым цветом - стирается (цвет пиксела становится нулевым и отображается фон)
4) изменяем координату
5) переходим к 1-му пункту
Приложение:
--------- Вывод - то место в тексте, где вы устали думать
Ответ отправил: Boriss (статус: Профессор) Россия, Саранск Организация: Мордовский госуниверситет, Саранск Факультет Электронной Техники WWW:Программирование на Паскале ---- Ответ отправлен: 01.02.2008, 13:22
Вопрос № 121.172
найти кол-во трёхзначных чисел,у которых сумма крайних цифр равна средней цифре
Отвечает: Tribak
Здравствуйте, А.Н. Сахаров!
program www;
var
j,c,a,b,i:integer;
begin
for i:=100 to 999 do
begin
a:=i div 100;
j:=i-100*a;
b:=j div 10;
c:=j mod 10;
if (a+c)=b then write(i,' ');
end;
readln;
end.
Ответ отправил: Tribak (статус: 7-ой класс)
Ответ отправлен: 01.02.2008, 12:44 Оценка за ответ: 5 Комментарий оценки: спс
Отвечает: Nazar__D
Здравствуйте, А.Н. Сахаров!
Если же это вариант не со всеми трёхзначными числами, а только с некоторыми, введенными в массив, то ниже код. Хотя наверное, предидущий ответ более верный. Заранее извинямс)))
Приложение:
--------- Я - українець!
Ответ отправил: Nazar__D (статус: 3-ий класс)
Ответ отправлен: 01.02.2008, 12:57 Оценка за ответ: 4 Комментарий оценки: спс за предоставленный вариант.
Вопрос № 121.243
Уважаемые знатоки алгоритмов и кодов, выручайте!!! 1. Дана чтрока символов, содержащая слова. Определить количество слов, начинающихся с буквы а.
2. Дана чтрока символов, содержащая слова. Определить количество слов, имеющих четную длину.
Отвечает: Зенченко Константин Николаевич
Здравствуйте, Титова Юлия!
Программа в приложении решает обе задачи.
Удачи!
Приложение:
--------- И только наступив на грабли мы приобретаем драгоценный опыт!
Ответ отправил: Зенченко Константин Николаевич (статус: Профессионал) Украина, Киев Тел.: +380958380164 Адрес: Украина г.Киев ---- Ответ отправлен: 05.02.2008, 19:30 Оценка за ответ: 5 Комментарий оценки: Замечательно!!! Спасибо за пояснения, так намного понятнее!! только хотелось бы отдельного решения задач, но разделить пожалуй даже я смогу!! Спасибо!!!
