Вопрос по информатике:
Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае не изменять его. Вывести полученное число.
(язык программирования паскаль)
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок — бесплатно!
- bookmark_border
- 17.10.2015 23:00
- Информатика
- remove_red_eye 10070
- thumb_up 48
Ответы и объяснения 1
Знаете ответ? Поделитесь им!
Как написать хороший ответ?
Чтобы добавить хороший ответ необходимо:
- Отвечать достоверно на те вопросы, на которые знаете правильный ответ;
- Писать подробно, чтобы ответ был исчерпывающий и не побуждал на дополнительные вопросы к нему;
- Писать без грамматических, орфографических и пунктуационных ошибок.
Этого делать не стоит:
- Копировать ответы со сторонних ресурсов. Хорошо ценятся уникальные и личные объяснения;
- Отвечать не по сути: «Подумай сам(а)», «Легкотня», «Не знаю» и так далее;
- Использовать мат — это неуважительно по отношению к пользователям;
- Писать в ВЕРХНЕМ РЕГИСТРЕ.
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Решение задач на Phyton
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи — смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Источник: online-otvet.ru
Дано целое число. Если оно является положительным, то прибавить к нему 1 ; если отрицательным, то вычесть из него 6; если нулевым, то заменить его на 14. Вывести полученное число.
1) program zadaca;
var
begin
writeln(‘Введи число a’);
readln(a);
if a > =0 then
if a=0 then a:=14 else a:=a+1
else a:=a-6;
writeln(a);
readln;
end.
2) program zadaca;
var
a: integer;
begin
writeln(‘Введи число a’);
readln(a);
if a > =0 then
if a=0 then a:=14 else a:=a+1
else a:=a-6;
writeln(a);
readln;
end.
3) program zadaca;
var
a: integer;
begin
writeln(‘Введи число a’);
readln(a);
if a > =0 then
if a=0 then a:=14 else a:=a+1
else a:=a-6;
end.
Аноним: выбрать
Ответы
Автор ответа: supernat83
Ответ:
Объяснение:
Во вложении, программа № 2 верна, только где if> =0, после > пробел не нужно ставить. На фото я проверила прогу
Как в JS привести число к Integer и как проверить, что число является целым?
Источник: sous-otvet.net
Написать программу дано целое число если оно является положительным то прибавить к нему 1
June 2022 1 9 Report
Задача. Дано целое число. Если оно является положительным, то прибавить к нему 1; иначе, если отрицательным, то вычесть из него 2, иначе заменить его на 10. Составить блок-схему и программу
Паскаль абс
Answers
if a >= 0 then
if a = 0 then a := 10
else Inc(a)
else a -= 2;
write(a);
end.
2 votes Thanks 1
More Questions From This User See All
TipsGamerPro August 2022 | 0 Ответы
dve storony pryamougolnogo treugolnika ravny 5 sm i 13 sm najdite tretyu storo
TipsGamerPro August 2022 | 0 Ответы
kak vy dumaete kakie problemy voznikayut pri ispolzovanii poleznyh iskopaemyh
TipsGamerPro August 2022 | 0 Ответы
Источник: scholar.tips