сервис вопросов и ответовДаны три действительных числа. Возвести в квадрат те из них, значения которых неотрицательны, и в четвертую степень - отрицательные. Писать
5-9 класс|
|
нужно на паскале.
Bloxina77
21 июня 2013 г., 2:27:13 (10 лет назад)
Kshhipachyova
21 июня 2013 г., 4:37:15 (10 лет назад)
var a,b,c:integer;
begin
write('Введите a = ' );readln(a);
if a>=0 then a:=sqr(a) else a:=sqr(a*a);
write('Введите b = ' );readln(b);
if b>=0 then b:=sqr(b) else b:=sqr(b*b);
write('Введите c = ' );readln(c);
if c>=0 then c:=sqr(c) else c:=sqr(c*c);
writeln('a = ',a,' b = ',b,' c = ',c);
end.
Ответить
Другие вопросы из категории
Закончите определения: фонетика - это раздел науки о...
Ботаника - это раздел науки о...
Земледельцы - это люди, ...
Тяжелая промышленность - это...
Легкая промышленность -это...
Пусть А - это стакан с чаем, а В - чашка кофе. Необходимо перелить кофе в стакан, а чай - в чашку так, чтобы напитки не смешались. Можно ли
рассматривать следующую блок-схему как модель решения поставленной задачи? Какая роль здесь отводится М? начало ! А,В,М ! М:=А ! А:=В ! В:=М ! конец
сообщение записанное при помощи 32-х символьного алфавита содержит 80 символов а сообщение записанное с помощью 64-х символьного алфавита -70 символов
сравните объёмы информации содержащейся в этих сообщениях? с дано и как полагается
Читайте также
ПОМОГИТЕ ПОЖАЛУЙСТА С ДВУМЯ ЗАДАЧАМИ НА ЯЗЫКЕ PASCAL: 1)даны 2 числа, заменить второе число нулем, если оно не меньше первого и оставить его
прежним,если это не так. 2)Даны 3 числа, возвести в квадрат те из них, значения которых не отрицательны, а отрицательные оставить без изменений
Вы находитесь на странице вопроса "Даны три действительных числа. Возвести в квадрат те из них, значения которых неотрицательны, и в четвертую степень - отрицательные. Писать", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.