Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Vov1111
07.06.2020 23:23 •
Информатика
Составить программу которая вычисляет значение z=x/y где y=sinx+0,5. в случае y=0 вывести на печать сообщения деление на 0
Показать ответ
Ответ:
MarGGoTV
02.10.2020 03:08
Program zzz;
var z,x,y: real;
begin
writeln ('Введите x');
readln (x);
y:=sin(x)+0.5;
z:=x/y;
if y=0 then writeln ('Деление на ноль') else
writeln ('z=',z);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
apolinarii2006
08.11.2022 13:47
1)составьте программу, которая запрашивает цифру от 1 до 3 и русует эту цифру в графическом окне.2)составьте программу, чтобы рисовалась любая вселенная цифра от 0 до 9.язык...
MmVl
15.10.2022 11:09
Составе программу в паскале для изображения рисунка...
Kakazabra
05.04.2020 03:35
З якою графікою в основному працює Inscape?а) растрова б) векторнав) піксельна...
gadjimira
03.01.2021 13:12
Самостоятельная работа по информатике 10 класс....
tropika33
23.02.2021 20:54
Выбери верный ответ (с , указанного ниже запрос отчёт форма...
milla25
06.04.2023 03:26
Даны целые числа a,b,k, вывести на экран k раз произведение чисел a и b...
anara34
11.11.2022 23:02
Дополните класс drob так, чтобы выполнялись следующие операции: drob a,b; cin a b; drob c = a + b; drob e = 10 * b; float f = a; cout class drob{ int zeloe; int chislitel; int...
iamash2450
14.02.2020 13:41
20. дополните класс drob так, чтобы выполнялись следующие операции: drob a,b; cin a b; drob c = a + b; drob e = 10 * b; float f = a; cout class drob{ int zeloe; int chislitel;...
Миша7991
07.02.2023 10:30
написать программ подсчета количества всех четных элементов пятой строки двумерного массива и произведения чисел, кратных пяти в третьем столбце этого массива, размером 7х9....
Shkaf2
03.07.2020 21:00
Синформатикой все которые под работа...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var z,x,y: real;
begin
writeln ('Введите x');
readln (x);
y:=sin(x)+0.5;
z:=x/y;
if y=0 then writeln ('Деление на ноль') else
writeln ('z=',z);
end.