Подарков ребят, помогите решить задачу для паскаля

Подарков ребят, помогите решить задачку для паскаля

Задать свой вопрос
Егор Сырецких
Давай условие
Юлия Звадинская
Ща
Светлана Бенар
Проверьте, есть ли посреди данных N чисел нули.Входные данныеВводится число N, а потом N чисел.Выходные данныеВыведите YES, если посреди введенных чисел есть желая бы один нуль, или NO в противном случае.
1 ответ
Var n,i,a,b,c,d:longint;beginreadln (n);for i:=1 to n dobeginread (c);if c=0 then b:=b+1;end;if bgt;0 then write ('YES') elsewrite ('NO');end.
Канищевский Артём
Давай.
Фимошкина Мирослава
Входные данныеВводятся целые числа a и b. Гарантируется, что a не превосходит b.Выходные данныеВыведите все числа на отрезке от a до b, являющиеся полными квадратами. Если таких чисел нет, то ничего выводить не необходимо.
Демур Эвелина
Ага, на данный момент минуту.
Тимур Мурачев
var a, b, i: longint;begin read(a,b); for i:= trunc(sqrt(a)+1-1e-9) to trunc(sqrt(b)) do writeln(i*i);end.
Boris Karastelev
Должна работать.
Ульяна Барцал
Емае по легче можешь сделать?
Zhenja Ancelevich
Мы пока ток 8 кл, trunc и sqrt ещё не знаю
Злата Бающева
Ну гляди.
Яна
sqrt это корень квадратный, а trunc округление.
Людмила Зепалова
Ааааааааааа пасиб
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт