Впаскаль даны 2 числа. возвести их в квадрат , если они не отрицательны. отрицательные числа оставить без имени
DeaDPooL797
1
30.12.2019 10:26
7
Другие вопросы по теме Информатика
Daasshha1
15.11.2020 15:37
Рикон1
15.11.2020 15:39
nonolo07
16.05.2020 09:53
rayl2
16.05.2020 09:53
Drocket
06.08.2019 13:20
moon2536
06.08.2019 13:20
Dafran
27.05.2019 13:00
bogdannazarenkomen
27.05.2019 13:00
austinova578
27.05.2019 13:00
Популярные вопросы
- 1. кинетическая энергия вращающегося тела. 2. сложение сил, действующих...
1 - Аргументы в пользу утверждения что насекомые являются самыми высокоорганизованными...
3 - Что такое , где находится панель компьютером . где находится панель...
3 - На складе была 400 кг бананов. после того, как в магазин отгрузили 16...
1 - За перший день хлопчик прочитав 20 сторінок книжки а кожного наступного...
3 - Вычисли заменяя умножение сложением. 12*3= 22*4= 15*4= 10*6=...
2 - Твір чому в спілкуванні не можна обійтися без складних речень...
2 - Можно ли фиалке газированную воду? кто нибудь ответьте! ! тому кто ответит...
3 - 5\6(1\2х - 2\3) = 3х - 2 1\4 решите уравнение . : 3...
2 - Заяц с кошкой весит 10кг,заяц с собакой весит 20кг,собока с кошкой весит...
2
PascalABc.NET
begin
var (a, b):= ReadReal2('Введи два числа:');
if a >= 0 then a := a * a;
if b >= 0 then b := b * b;
Println(a, b)
end.