tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Даны 2 числа больше некоторого
Даны 2 числа больше некоторого введенного k получить квадрат из модулей, если числа отрицательные, то сложить их, в противном случае увеличить числа в 3 раза
ERESYUR
3 04.06.2019 18:30
1
Ответы
белка263
01.10.2020 19:19
Var a,k,v:real;
begin
readln(a,k);
if a>k then begin
v:=abs(a*a);
write(v);
end;
if (a<0) and (k<0) then
v:=a+k
else
writeln(a+3,' ',k-3);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Gdbxfg
04.10.2019 03:20
Дан массив, определите количество минимальных элементов в массиве....
serpermiakov
04.10.2019 03:20
Пример фрагмента программы массива на языке паскаль...
kosonogova
26.08.2019 14:50
Дано два вещественных числа a и b. найти произведение целых частей этих чисел....
AndruxaS
26.08.2019 14:50
На заданном интервале целых чисел [a,b] для функции y= sin^2(x)+cos(x^2 ), подсчитать количество отрицательных значений. в паскале...
Лизок892
19.02.2021 08:04
1.Какой оператор используется для программирования алгоритмов ветвления в языке С++? 2.Перечислите структуру полного условного оператора 3.Перечислите структуру неполного...
samuray99
19.02.2021 08:04
Дана программа на языке программирования Паскаль. Запиши данную программу и запусти. program z1; var mas, A: array[1..10] of real; begin mas[1]:=15; mas[5]:=24; mas[9]:=83;...
увливуют
14.07.2019 03:10
№17.1. доступ к файлу txt. html, находящемуся на сервере ru. net, осуществляется по протоколу http. фрагменты адреса файла закодированы буквами от а до ж. запишите последовательность...
EugeneEugene007
15.09.2019 23:10
Даны два числа. если эти числа неотрицательные, то найдите их сумму, иначе модуль разности...
shevchenkok1
15.09.2019 21:44
Укажи, к какому информационному действию относится объединение предметов в группу по общему признаку.обработкапредставлениехранение сборпередача...
Вsеzнaйkа
15.09.2019 23:10
Наука о методах сбора,хранения,преобразования,отправки,получения и использования информации....
Популярные вопросы
Созидайте глупый вопрос по для четвертого класса...
2
Разбор слова ) чиновнику как часть речи...
2
Постройте график функции у=х^2 с графика функции определите при каких...
3
Из пункта а в пункт б выехал вышел пешеход со скоростью 5 километров...
2
Запиши множество значений переменной у, при которых дробь 18/у+2 является...
3
Вевразии лето. какое время года в австралии объясни свой ответ...
1
Запиши число в котором : 800 ед.2 класса и 40 ед.1 класса...
3
Напишите программу на языке паскаль для решения следующей : известно,...
1
Мать старше дочери в 3 раза,а вместе им 40 лет.сколько лет матери,а...
2
Найти 5 фразеологизмов со словом ветер...
2
begin
readln(a,k);
if a>k then begin
v:=abs(a*a);
write(v);
end;
if (a<0) and (k<0) then
v:=a+k
else
writeln(a+3,' ',k-3);
end.