Войти
Регистрация
Спроси ai-bota
Xanuzbek
10.03.2022 02:41
Программа в pascal abc с клавиатуры вводится вещественное число, если оно из интервала {3,10} то на экран вывести его целую часть иначе десятичную
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
romakereshev
10.03.2020 20:49
4. что мы увидим на экране после выполнения программы? var x : integer; y: real; begin x: =100; y: =5; writelen(‘результат: ’: 25); write(‘при х=’, х: 5, х/5: 6: 2); write(‘х...
Sophia4sophia
10.03.2020 20:49
Составить схему алгоритма и программу определения в массиве из 11 элементов тех значений, которые кратны 2....
rrrr10
10.03.2020 20:49
Вдвумерном массиве подсчитать кол-во нечетных элементов. массив заполнить случайными числами в интервале от -3 до 10. вывести на экран массив в виде таблицы и кол-во нечетных...
FedShar28
10.03.2020 20:49
2.правильны ли следующие операторы присваивания? если нет, то почему? a) k: =k mod 3+k*cos(5); б) x: =x*2 div 6+x/4; если нет исправьте, !...
gusew7kaja
10.03.2020 20:49
1.в компьютерных сетях протокол рор3 работает на уровне модели взаимодействия открытых систем. a. прикладном b. сетевом c. d. транспортном 2.топология сети не является базовой....
natashavoropaeva
25.09.2020 08:30
Составить блок- схему решения следующей .даны значения двух действительных переменых a и b.обменять местами их значения, при этом нельзя использовать никаких дополнительных...
Raf4ik15
25.09.2020 08:30
Составить программу определения количества цифр в целом числе ps; код программы паскаль....
gulmamedovaxayald
25.09.2020 08:30
Составьте paskal-программу решение следующей : задан массив a(n).найти сумму и количество чётных отрицательных элементов этого массива...
layma45
05.09.2021 09:04
Программа делфи. язык паскаль. напишите программу нахождения всех трёхзначных чисел, сумма цифр которых равна а...
Gerfat347
05.09.2021 09:04
Составьте программу выводящую на экран большее из 5 чисел программа из кумира...
Ответ:
aruzhan7klass
30.09.2020 02:34
Var r: real;
begin
read(r);
if (r > 3) and (r < 10) then
write(trunc(r))
else
write(r - trunc(r))
end.
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота