katrin819
?>

очень нужно! Запусти Pascal. Введи программу. program pr_1; var x, y, sum, umn: integer; begin write ('x='); readln (x); write ('y='); readln (y); sum:=x+y; umn:=x*y; writeln ('sum=', sum); writeln ('umn=', umn); readln; end. Результаты работы внеси в таблицу для заданных x и y.

Информатика

Ответы

Владимир

sum=67

umn=1092

Объяснение:

Shirochkingames

Принципы здорового и осознанного образа жизни распространяются как новая религия планетарного масштаба — им учат в школах и за их соблюдением пристально следит общество.Активно распространяется интернет всего — к нему подключается все больше устройств, производство становится безлюдным, концепция Индустрии 4.0 доминирует не только в развитых, но и во многих развивающихся странах.Яркая черта периода. Каждый третий хотя бы раз задумывается о биохакинге — попытке «взломать» генетически заданный уровень здоровья и продолжительность жизни.Маловероятное событие (джокер). Наступает «инновационная зима» — самые масштабные инвестиции в передовые научные разработки не оправдаются. Результаты пока далеки от обещанных фундаментальных прорывов — начиная от искусственного интеллекта и заканчивая медициной, не говоря уже о скорости их распространения в сложных многоукладных экономиках.

lena260980

2-ое задание:

#include <iostream>

int main() {

int number;

std::cout << "Введите число: " << std::endl;

std::cin >> number;

if (number > 0)

 std::cout << "Положительное" <<std::endl;

else if (number < 0)

 std::cout << "Отрицательное" << std::endl;

else

 std::cout << "Ноль" << std::endl;

return 0;

}

1-ое задание:

#include <iostream>

int main() {

double dollars, grivnas;

std::cout << "Введите кол-во долларов: " << std::endl;

std::cin >> dollars;

grivnas = dollars * 28.3;

std::cout << dollars << " доллар-(а, ов) в гривнах " << grivnas << std::endl;

return 0;

}

Объяснение:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

очень нужно! Запусти Pascal. Введи программу. program pr_1; var x, y, sum, umn: integer; begin write ('x='); readln (x); write ('y='); readln (y); sum:=x+y; umn:=x*y; writeln ('sum=', sum); writeln ('umn=', umn); readln; end. Результаты работы внеси в таблицу для заданных x и y.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Railyan
reception
Shevtsov1818
kisuhakisa
uvarovig
Григорьевич915
Акимцева27
tigran87-87
e-s-i-k
kokukhin
Oksana-Kirakosyan1301
yurievaalxndra55
menesmir
lor005148
tatry2005