Даны 3 числа. возведите в квадрат те из них значения которых отрицательны. (записать программу на языке паскаль).
шамшода
2
27.05.2019 16:10
2
Другие вопросы по теме Информатика
vilrimma
15.03.2019 17:00
eva301
15.03.2019 17:00
1234567891241
15.03.2019 17:10
Flowers09
15.03.2019 17:10
nikinouston342
06.02.2022 20:12
Aleksandra1111117
06.02.2022 20:20
LunnayaLiliya
18.04.2020 22:01
salavat5sal
18.04.2020 22:10
Дарина55134
18.04.2020 22:11
Популярные вопросы
- • 3. Знайдіть площі трикутників за малюнками.Трикутник ACB-рівнобедрений.Рис....
2 - 9. Потові залози мають:а) риби б) земноводні В) плазуни г) птахи д) ссавці...
3 - При неблагоприятных условиях хлорелла размножается половым путем или...
3 - При охолодженні свинцевого бруска від 80 ° до 30° виділилось 16.9 к/Дж....
2 - Умоляю решить физику , ну под картинку напишите :решаю ,чтобы я понял...
1 - Анализ( представления) по любому произведению мамина- сибиряка. Какая...
2 - При перемещении или копировании в электронной таблице относительные ссылки:...
1 - Придумать текст с этими словами.Үміткер, бекіт, кенші, бірауыз, бастамашы,...
3 - Напиши в ре диез миноре и ми бемоль миноре характерные интервалы ув 2...
1 - Решите тригонометрическое уравнение: ctg x\4 * (tg X + √3)= 0...
1
begin
read(a,b,c);
if a<0 then
a:=sqr(a);
if b<0 then
b:=sqr(b);
if c<0 then
c:=sqr(c);
write(a,' ',b,' ',c);
end.
begin
readln(a,b,c);
if a < 0 then a:=a*a;
if b < 0 then b:=b*b;
if c < 0 then c:=c*c;
writeln(a,b,c);
end.