сервис вопросов и ответовРешите, пожалуйста, задачу в паскале (условия на картинке, вариант б)
10-11 класс|
|
Прикрепленные изображения
Andualadidn4
25 дек. 2016 г., 13:31:43 (7 лет назад)
18Настя
25 дек. 2016 г., 14:05:54 (7 лет назад)
var a:array of integer;
i,p,n:integer;
begin
p:=1;
readln(n);
setlength(a,n);
for i:=0 to n-1 do begin
read(a[i]);
p*=abs(a[i]);
end;
writeln(p);
end.
Ответить
Другие вопросы из категории
Читайте также
Нужно решить задачу в Паскале, условие таково:
"Найти наименьшее кратное двух чисел a и b"
Насколько я помню в этой задаче можно использовать команду Break.
Знайка нарисовал карту Земляничной страны в графическом редакторе ПРОграфик. Цифры на карте обозначают номер цвета, буквы - разные области страны. Затем
он решил залить лист одним цветом. В редакторе есть инструмент "Залить здесь", который позволяет менять цвет области на выбранный кликом по ней. Для инструмента определены 4 цвета (1,2,3,4 на карте), которые активируются кликом на панели цветов. В начальный момент времени выбран инструмент "Залить здесь", для которого активен белый цвет. После каждого использования инструмента Знайка должен менять цвет на ранее НЕиспользовавшийся. Области с общим участком границы, у которых совпали цвета, далее рассматриваются как одна область. За какое минимальное количество кликов Знайка перекрасит карту в один цвет.
Нужно решить задачу в Паскале, условие таково:
Пользователь вводит число заранее неизвестное.
Выяснить есть ли в этом числе хотя бы две одинаковые цифры.
Привет, решите пожалуйста задачу в pascal abc
Смотрим фотку!
Спасибо заранее!
Вы находитесь на странице вопроса "Решите, пожалуйста, задачу в паскале (условия на картинке, вариант б)", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.