Var a, b, c, d, e: real;
begin
readln(a, b, c)
writeln(c*(a/b):0:3, ' руб.');
end.
Print(sorted("Sam is a multi-file text editor based on structural regular expressions It was originally designed in the early 1980s at Bell Labs by Rob Pike with the help of Ken Thompson and other Unix developers for the Blit windowing terminal running on Unix it was later ported to other systems Sam follows a classical modular Unix aesthetic It is internally simple its power leveraged by the composability of a small command language and extensibility through shell integration".split())[39])
Знаешь, разновидность их бывает разная, например Dr.web. Он перехватывает вирусняки до того как они нанесут вред.
А самый первый антивирус был написан CHK4BOMB и BOMBSQAD позволяли производить анализ загрузочного модуля с помощью контекстного поиска и перехватывать операции записи и форматирования, выполняемые через BIOS. На то время они были очень эффективны и быстро завоевали популярность.
Чтобы программировать и создавать программы
// Листинг программы и скриншот результата в приложениях.
const
max_v = 15;
m1 = -20;
m2 = 50;
var i,j:byte;
v:array [1..max_v] of integer;
a,b:integer;
// начальное заполнение массива
procedure randomArray(tx:string);
var i:byte;
begin
writeln(tx);
randomize();
for i:=1 to max_v do begin
v[i]:=random(m1,m2);
write(v[i]:6);
end;
writeln('');
writeln('');
end;
begin
randomArray('Начальный массив');
writeln('Вывести все элементы,в записи которых есть цифра 5 или 7');
for i:=1 to max_v do begin
//десятки числа
a:=v[i] div 10;
//единицы числа
b:=v[i] mod 10;
if (a=7) or (a=5) or (b=7) or (b=5)
then
writeln(v[i]);
end;
end.
