Program n_5;
var a, d: integer;
b, c, f: real;
begin
d := random(1, 8);
writeln('Для выбора А-92 введите 1. Цена: 20.00руб. за литр');
writeln('Для выбора А-95 введите 2. Цена: 25.00руб. за литр');
writeln('Для выбора А-98 введите 3. Цена: 30.00руб. за литр');
write('Введите марку бензина - ');
readln(a);
write('Введите количество литров - ');
readln(b);
if (a < 1) or (a > 3) or (b <= 0) then
write('Ошибка. Введены некорректные значения');
case a of
1: c := 20 * b;
2: c := 25 * b;
3: c := 30 * b
end;
writeln;
writeln('.........Кассовый чек.........');
writeln('АЗС: "Полный бак"');
writeln('Адрес: г.Волгоград, улица Новослободская д.32');
writeln('Кассир: Иванова Ирина Викторовна');
writeln('Номер колонки: ', d);
case a of
1: writeln('Бензин: А-92');
2: writeln('Бензин: А-95');
3: writeln('Бензин: А-98');
end;
write('Введите размер оплаты - ');
readln(f);
writeln('Сумма к оплате - ', f);
if f > c then
writeln('Сдача: ', f - c)
else
writeln('Не достаточно средств');
write('Хорошего дня');
end.
#include <iostream>
int main() { char a; unsigned int count = 0; do { std::cin>>a; if (a == '[' || a == '(' || a == '{') count ++; } while (a != '.'); std::cout<<count;}
8 Мбайта = 8*1024 Кбайт = 8192 Кбайт
S1 = v*t1, S2 = v*t2
S2 = (S1/t1)*t2 = (8192/100)*25 = 2048 Кбайт
Лучший ответ пж, ведь я помог :)
Алгоритм - это последовательность действий,строгое исполнение которой приводит к определенному результату
существует 3 основные алгоритмические конструкции: •Следование
<span>•Ветвление
</span><span>•<span>Повторение
1) </span></span>линейный алгоритм (следование) - это способ организации действий, при
котором команды (действия) следуют друг за другом, последовательно
2) Разветвляющийся
алгоритм (ветвление) - обеспечивает
в зависимости от результата проверки условия (да или нет<span>)
выбор одного из вариантов работы алгоритма</span>
3) Циклический
алгоритм (повторение) - о<span>беспечивает многократное выполнение
совокупности действий, которые называются телом цикла</span>