дано 3 числа а,b,c.возвести в квадрат те числа которые отрицательные
5-9 класс
|
uses crt;
var a,b,c:integer;
begin
writeln(' vvedite 3 chisla');
readln(a,b,c);
if a<0 then a:=sqr(a);
if b<0 then b:=sqr(b)
else
if c<0 then c:=sqr(c);
writeln('a=',a);
writeln('b=',b);
writeln('c=',c);
end.
ПАСКАЛЬ !!!!
VAR
a, b, c: Int64;
BEGIN
Read(a, b, c);
If (a < 0) then Writeln(a*a);
If (b < 0) then Writeln(b*b);
If (c <0 ) then Writeln(c*c);
END.
Другие вопросы из категории
и опускала ее в лукошко. Так Маша делала до тех пор, пока на кусте не осталось ни одной ягоды. Из этих ягод сварили очень вкусное варенье. – выберите из предложенных надписей те действия, которые Маше придется повторять несколько раз. – какая надпись может служить условием? – в каком порядке нужно расставить надписи на блок-схеме? (перестановку надписей может произвести один из учащихся) – будет ли задача решена, если поменять местами «да» и «нет»? С помощью слайда 19 можно проверить правильность расстановки команд на схеме.
Читайте также
прежним,если это не так. 2)Даны 3 числа, возвести в квадрат те из них, значения которых не отрицательны, а отрицательные оставить без изменений
сел - отрицательное, то найти Iа+ b+cI иначе а+b+c +d в корне.
Даны три числа. Если произведение данных чисел - отрицательное, то каждое число возвести в квадрат, иначе найти модуль каждого числа
ПОМОГИТЕ ОЧЕНЬ ПРОШУ
результат
2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат
этих двух чисел заменить половиной их суммы, а большее — их удвоенным произведением.
2)Даны вещественные числа х и у, не равные друг другу. Меньшее из этих двух чисел заменить половиной их суммы, а большее — их удвоенным произведением.
N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!