Var k:integer;
s, x, a:real;
begin
writeln('Введите цену за первые 75 газет.');
readln(a);
writeln('Введите цену за последующие газеты.');
readln(x);
k:=133;
s:=(a*75)+((133-75)*x);
writeln(s);
end.
Ответ:
1)Байт, килобайт, мегабайт, гигабайт и т.д
2)Информационный объем сообщения это - кол-во двоичных символов, которое используется для кодирования этого сообщения.
3)Бит - это единица измерения количества информации.
4)Скорость передачи информации - это объем данных, передаваемый за единицу времени.
<span>Цель запроса на выборку состоит в создании результирующей таблицы, в которой отображаются только нужные по условию запроса данные из базовых таблиц. </span>
На c++
#include <iostream>
#include <conio.h>
using namespace std;
int main()
{
int k;
cin >> k;
if (k >= 0)
{
k *= k;
cout << k << endl;
}
else
{
cout << k << "<0" << endl;
}
_getch();
return 0;}
прогони программу пошагово в PascalABC, поймешь как все работает.