сервис вопросов и ответовВ паскале написать программе,пожалуйста решите: Дано число.Если оно кратно 5,то увеличить его на 3
5-9 класс|
|
Arsentoki1982
09 авг. 2013 г., 0:20:38 (10 лет назад)
Pisarevaksyusha
09 авг. 2013 г., 2:45:02 (10 лет назад)
Var N:integer;
begin
read(N);{Считываем значение N}
if(N mod 5 = 0) then N:=N+3;{Если оно кратно 5ти, то увеличиваем на 3}
writeln(N);{Выводим значение N}
end.
Ответить
Другие вопросы из категории
Составить программу для Паскаля. Запросить у пользователя два числа и вывести на экран результат суммы, разности, произведения и частного числа этих
чисел полным ответом.
напишите программу для решение задачи . камера наблюдения регистрирует в автоматическом режиме скорость проезжающих мимо нее автомобилей , округля я
значение скорости до целых чисел . необходимо определить минимальную зарегистрированную скорость автомобиля . если скорость хотя бы одного автомобиля была больше 80 км/ч , ВЫВЕДИТЕ YES ИНАЧЕ NO . программа получает на вход число проехавших автомобилей n(1<=n<=30), затем указываются их скорости . значение скорости не может быть меньше 1 и больше 300 . программа должна сначала вывести минимальную скорость , затем yes или no .
файл размером 120 кбайт передается через некоторое соединение со скоростью 3072 бит в секунду. определите размер файла в который можно передать за то же
время через другое соединение со скоростью 1024 бит в секунду. в ответе укажите одно число -размером файла в кбайт. единицы измерения писать не надо
файл размером 1000 кбайт передается через некоторое соединение в течение 1 минуты . определите размер файла (кбайт), который можно передать через это соединение за 36 секунд. в ответе укажите число -размер файла в кбайт .единицы измерение писать не надо
Пожалуйста помогите ответить на вопрос: Программы обслуживания устройств компьютера называются:
А,Драйверами
В.Загрузчиками
С.Трансляторами
Д.Интерпретатор
Читайте также
помогите решить пожалуйстаа)
1)Дано целое число ,если оно не четное ,то увеличить его на 3,иначе увеличить его в 5 раз.
2)Даны 2 числа вещественного типа не равные друг другу.Меньшее из них заменить половиной их суммы ,а большее - их удвоенным произведением.
3)Даны 2 числа k и m.Если первое число отрицательно ,то его значение заменить его модулем;иначе второе число заменить единицей .Результат (оба числа) вывести на экран.
*Дано* *целое* *число*. *Если* *оно* *является* *положительным*, *то* *прибавить* *к* *""нему* *1*; если отрицательным, *то* вычесть из *него* 2; если
нулевым, *то* ""заменить *его* на 10. Вывести полученное *число*.
Срочнооо
Вы находитесь на странице вопроса "В паскале написать программе,пожалуйста решите: Дано число.Если оно кратно 5,то увеличить его на 3", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.