tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу
Составить программу в паскале! 9 класс! ! даны вещественные числа х и у, не равные друг другу. меньшее из этих двух чисел заменить половиной их суммы, а большее — их удвоенным произведением.
Налим12
1 19.05.2019 17:10
0
Ответы
llleeennn
12.06.2020 21:26
program mar;
var x,y:real
Begin
x:=30; y:=10
y:=(x+y)\2:
x:=2*x*(x-y);
writeln (x,y);
readln;
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Aliona200
18.05.2020 14:33
Запиши верный ответ (без пробелов). Write ( h= , h); Для h : 10 на экране будет...
xeniaverner
18.05.2020 16:24
Записать выражение на Паскаль....
suhrobiddin98
18.05.2020 16:24
1) Какой минимальный объём памяти (в Кбайт) нужно зарезервировать, чтобы можно было сохранить любое растровое изображение размером 64 на 128 пикселов при условии, что в изображении...
LEH9
18.05.2020 16:24
Разработать алгоритм и составить программу (В Паскаль) вычисления значений следующих функций: Заранее...
наська241
30.09.2019 08:01
Скроссвордом по информатике! 1) один из видов языков 9 букв 2) … представляет собой заменитель объекта - предмета, явления или процесса 4 буквы 3) знаковая система определяется...
nail18121
30.09.2019 08:01
Логика и компьютер найдите значение логического выражения: 5 8 \/ 3 + 6 = 9 /\ 4=3 истина ложь...
zhenianet
30.09.2019 08:01
Сообщение о том, что петя живет во втором подъезде, несет 3 бита информации. сколько подъездов в доме?...
AliKsandraSm
30.09.2019 08:01
Напишите программу, которая вводит натуральные числа a , b и n , и выводит на экран n псевдослучайных целых чисел на отрезке [ a , b ] . входные данные входная строка содержит...
020577
30.09.2019 08:01
Выберите правильный ответ записи условного оператора: 1. if(i 31) then writeln(a= ; a*b); else writeln(a= ; a/b); 2.if x 15 then writeln( x =15); 3.if x 10 then; x=d+c; end....
Gafana
30.09.2019 08:01
Господа , дело жизни и смерти , колледж предмет: промышленно- процессы и моделирование, и учитель задает мне вопросы о языках программирование , в том числе такова вопрос учителя...
Популярные вопросы
Склонять по падежам: сорок,девяноста,сто 20 заранее !...
1
Please say me fast. combine the following sentences using either or, neither...
3
Сколько корзин потребуется, чтобы разложить 12 (18, 9,15) мячей по 3 в каждую...
1
Іть написати твір з процесом праці написання писанки твір має мати думку ну...
1
Воспользуясь распределительным свойством умножения найди значения выражений(627+185)•12=это...
2
Запишите числа (дроби) в порядке возрастания: - 4/18, 2/15, 2/19 (обратите...
3
Н.некрасов. крестьянские дети о каких двух сторонах медали жизни крестьянских...
3
На плоскости отмечено 4 точки. сколькими их можно обозначить буквами латинского...
3
Всообщающиеся сосуды налить ртуть ,вода и керасин.какова высота слоя керасинв...
1
8класс.. что легче оксид серы (iv) и оксид серы (vi)...
3
program mar;
var x,y:real
Begin
x:=30; y:=10
y:=(x+y)\2:
x:=2*x*(x-y);
writeln (x,y);
readln;
End.