Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.75/4: Рейтинг темы: голосов - 4, средняя оценка - 4.75
0 / 0 / 0
Регистрация: 14.12.2018
Сообщений: 2
1

Даны целые числа. Верно ли, что в последовательности есть 0 члены

21.12.2018, 21:49. Показов 704. Ответов 2

Данные целые числа a1.....an. Верно что в последовательности есть 0 члены
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.12.2018, 21:49
Ответы с готовыми решениями:

Даны целые числа a1, a2,.a10. Верно ли, что их сумма есть нечетное число
Здрасте) Помогите пожалуйста. Даны целые числа a1, a2,...a10. Верно ли, что их сумма есть...

Даны две последовательности. Верно ли, что все члены второй последовательности входят в первую?
Даны две последовательности a^1,a^2,...,a^n, b^1,b^2,...,b^n (m<n). В каждой из них члены различны....

Даны целые числа a1,.,an. Все члены последовательности с четными номерами
Помогите перенести на СИ. var a:array of integer; i,n,max:integer; begin writeln ('vvedite...

Даны целые числа а 1,а 2,. ,а N .Удалить из последовательности все члены со значением max(a1,.,aN)?
Запишите в одномерном массиве.

__________________
2
Эксперт Pascal/Delphi
6629 / 4459 / 4744
Регистрация: 05.06.2014
Сообщений: 21,923
22.12.2018, 12:45 2
Цитата Сообщение от Miron4ik Посмотреть сообщение
Даны целые числа
Кем даны? Откуда даны? Да когда же вы научитесь правильно формулировать ТЗ?
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
5722 / 3433 / 2439
Регистрация: 22.11.2013
Сообщений: 9,643
Записей в блоге: 1
28.12.2018, 14:07 3
Pascal
1
2
3
4
for i:=1 to n do begin
  Read(t); Inc(k,Ord(t=0));
end;
WriteLn(k<>0);
Pascal
1
2
3
4
5
i:=n;
repeat
  Read(t); Inc(k,Ord(t=0)); Dec(i);
until (i=0) or (k<>0);
WriteLn(k<>0);
Добавлено через 2 минуты
Pascal
1
2
3
4
5
6
7
for i:=1 to n do begin
  Read(t);
  if t=0 then begin
    Inc(k); Break;
  end;
end;
WriteLn(k<>0);
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.12.2018, 14:07

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

Даны целые числа a1, …, an среди которых могут быть повторяющиеся члены. Найти число различных членов последовательности.
В MASM написать программу решения задачи: Даны целые числа a1, …, an среди которых могут ...

Даны две последовательности.Верно ли, что все числа второй последовательности входят в первую.
Даны две последовательности {a}_{1},{a}_{2},...,{a}_{n} и {b}_{1},{b}_{2},...,{b}_{m} (m&lt;n). В...

Даны натуральное число m и целые числа a1, a2, a3 , .,am . Выяснить, верно ли, что количество тех чисел , которы
Даны натуральное число m и целые числа a1, a2, a3 , ...,am . Выяснить, верно ли, что количество...

Даны целые числа а1,а2,.Известно что а1>0 и что среди а2,а3,. есть хотя бы одно отрицательное число
Даны целые числа а1,а2,...Известно что а1&gt;0 и что среди а2,а3,... есть хотя бы одно отрицательное...


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

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

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