Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
Vloodek
0 / 0 / 0
Регистрация: 26.01.2020
Сообщений: 2
1

Вывод сообщения о том,что не удалось найти числа

26.01.2020, 08:44. Просмотров 860. Ответов 1
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
program n_2;
  var min,b, i: integer; 
      a: array[1..10] of integer;
begin
randomize;
  for i:=1 to 10 do 
  begin
  a[i]:=random(49)+1;
  writeln ('a[',i, ']=', a[i])
  end;
 
       b:=0;
     min:=50;
for i:=1 to 10 do
 if (a[i]<min)  and (a[i] mod 10 = 5 ) then 
      b:=a[i];
       
       
 
   
  writeln('Минимальное значение оканчивающееся на пятерку равно - ',b);
  
end.
То есть он выводит в любом случае значение какое-либо
А я хочу,чтобы если у него не получилось найти(то есть значение b=0) то он писал *Не удалось найти значения*
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.01.2020, 08:44
Ответы с готовыми решениями:

Вывод сообщения о том, на сколько процентов выполненена функции
Добрый день форумчане, хочу организовать в функции процессс выполнения писать: cin &lt;&lt; fun; ...

Проблема, в том, что мне не удалось установить Kali Linux на флешку так, чтобы данные на ней сохранялись
Делал все по инструкции на ютубе. Kali Linux на флешку установить удалось, но решить проблему...

Почему программа не выводит сообщения о том,что той или иной цифры в числе нет,если в ней всё прописано?
int a, b, k, i,b1; int n; i = 0; b1 = 0; Console.Write(&quot;Введите...

При вводе числа,получить вывод некого сообщения. В моем случае вывод праздников в определенном месяце
Помогите пожалуйста ,как такое написать?

Вывод числа в окно сообщения
#include&lt;windows.h&gt; #include&lt;tchar.h&gt; #include&lt;time.h&gt; #define _UNICODE void RandomFunction()...

1
Puporev
Модератор
58916 / 44599 / 30782
Регистрация: 18.05.2008
Сообщений: 106,865
26.01.2020, 09:04 2
Лучший ответ Сообщение было отмечено Vloodek как решение

Решение

Pascal
1
2
3
4
if b=0 then writeln('Не удалось найти значения')
else writeln('Минимальное значение оканчивающееся на пятерку равно - ',b);
  
end.
1
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.01.2020, 09:04

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Вывод числа на экран в том виде, в котором оно хранится в памяти
Вывод числа на экран при помощи флага СF в том виде, в котором оно хранится в памяти. В моём...

Справедливо ли, глядя на отвратительное правописание человека, сделать вывод о том, что он - неграмотное быдло?
То, что народ нынче элементарные слова пишет с ошибками - в порядке вещей. Анкеты вконтактах и...

Не удалось добавить ссылку на проект в том-же решении
Пишу первое приложение для Windows Phone 8.1. Возникла необходимость добавить ссылку из одного...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.