Паскаль абс. нет у меня выводит строка имела неверный формат (строка где tovar) var money, cost, summa, tovar : real; count : integer; begin writeln('введите исходные данные: '); writeln('какой товар вы покупаете? '); readln(tovar); writeln('по какой цене? '); readln(cost); writeln('сколько штук? '); readln(count); summa : = cost*count; writeln('ваш товар - ', tovar, '. стоимость покупки: ', summa: 0: 2); writeln('сколько денег даете? '); readln(money); if money > summa then writeln('ваша сдача: ', money-summa) else end.

Var money,cost,summa: real;   count : integer; tovar : string; begin  writeln('введите исходные данные: ');   writeln('какой товар вы покупаете? '); readln(tovar); writeln('по какой цене? '); readln(cost);   writeln('сколько штук? '); readln(count);   summa : = cost*count;   writeln('ваш товар - ', tovar, '. стоимость покупки: ',summa: 0: 2);   writeln('сколько денег даете? ');   readln(money);   if (money > = summa)  then writeln('ваша сдача: ',money-summa)    else writeln ('вам нехватает ',summa-money) end.

списать текст..?

Впервые термин informatique стал использоваться во Франции в 60-х годах. В англоязычных странах ему соответствует синоним computer science (наука о компьютерной технике). Предметом изучения информатики является информация и все те действия, которые мы с ней можем совершать: создание, хранение, обработка (преобразование) и передача (получение). С самых давних времен человек окружён информацией. Потребность выразить и передать её появлению речи, письменности, изобразительного искусства, музыки, привела к созданию книгопечатания, почтовой связи, телеграфа, телефона, Интернета. Информатика — это научная и прикладная область знаний, изучающая законы, методы и хранения, передачи, обработки, поиска информации с компьютерных и других технических средств.

Для перевода в двоичную систему делим число на 2 и записываем остатки от деления  285/2=142 остаток 1 142/2=71 остаток 0 71/2=35 остаток 1 35/2=17 остаток 1 17/2=8 остаток 1 8/2=4 остаток 0 4/2=2 остаток 0 2/2=1 остаток 0 1/2=0 остаток 1 записываем остатки снизу вверх 285₁₀=100011101₂ для перевода десятичного числа в восьмеричную систему счисления    проделываем те же операции, только делим на 8 285/8=35 остаток 5 35/8=4 остаток 3 4/8=0 остаток 4 записываем ответ снизу вверх 285₁₀=345₈ для перевода десятичного числа в шестнадцатеричную систему делим соответственно на 16 285/16=17 остаток 13, что в шестнадцатеричной системе соответствует букве d 17/16=1 остаток 1 1/16=0 остаток 1 ответ 285₁₀=   11d₁₆