Katruna24

09.01.2023 21:26

Информатика

Есть ответ 👍

Создайте программный код, который потребует ввести любые два числа a b и рассчитать: выражение (a + b)/b; (создать в паскале). Перед выводом результатов экран очищается, и реализуется пауза, чтобы были видны результаты. Цвет текста результатов черный, фон белый. Результаты выводятся в формате (результат: 8: 3). Возможный результат работы программы.

190

450

Посмотреть ответы 2

Ответы на вопрос:

NeviL1488

Информатика

4,4(48 оценок)

C++:

#include <bits/stdc++.h>

using namespace std;

int main() {

long long a, b; cin >> a >> b;

system("cls && color ") < код цвета

cout << (a + b) / b;

}

PASCAL:

var a, b, c: integer;

begin

readln(a);

readln(b);

c:=(a+b)/b;

ClrScr;

textbackground(...); < где троеточие вставляй код цвета

textcolor(...);

writeln(c);

end.

Объяснение:

Коды цветов в паскаль:

0 Black, черный. 8 DarkGray, темно-серый.

1 Blue, синий. 9 LightBlue, ярко-синий.

2 Green, зеленый. 10 LightGreen, ярко-зеленый.

3 Cyan, голубой. 11 LightCyan, ярко-голубой.

4 Red, красный. 12 LightRed, ярко-красный.

5 Magenta, фиолетовый. 13 LightMagenta, ярко-фиолетовый.

6 Brown, коричневый. 14 Yellow, желтый.

7 LightGray, ярко-серый. 15 White, белый

Важно для работы ClrScreen надо подключить модуль Crtl через use

SanyaVetka

Информатика

4,8(66 оценок)

1. var a,i,x,k,y,z,b,c: integer; begin writeln ('введи число'); readln (a); for i: =2 to a do if a mod i =0 then k: =k+1; if k=1 then writeln ('число простое') else writeln ('число составное'); readln; end. 2.var a,i,k,x: integer; begin for i: =100 to 999 do if i mod 3=0 then begin a: =i mod 10 + i div 10 mod 10 + i div 100 mod 10; k: =i div 3; while k> 0 do begin x: =k mod 10 + x; k: =k div 10; end; if a> x then write (i,' '); a: =0; x: =0; end; readln; end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.