Эти языки близки к Python своей динамической семантикой, но настолько различаются своим подходом к синтаксису, что их сравнение превращается почти в религиозный спор: является ли скудость синтаксиса Lisp преимуществом или недостатком? Следует заметить, что Python имеет интроспективную совместимость подобную к аналогичной у Lisp, а программы на Python могут конструировать и исполнять элементы программ на лету.
Обычно практичность является решающим фактором: Common Lisp большой (во всех смыслах), а мир Scheme разделяется на множество несовместимых версий, тогда как Python имеет единую, свободную, компактную реализацию.
Объяснение:
Объяснение:
УДАЧИ С ЛЮБОВЬЮ EXLENG❤
program raf105;
var
A: real;
x: integer;
begin
write('Введите число в битах: ');
readln(A);
writeln('1. Байт');
writeln('2. Килобайт');
writeln('3. Магабайт');
writeln('4. Гигабайт');
write('Введите номер единицы, в которую нужно перевести: ');
readln(x);
if x=1 then writeln(A/8,' байт')
else if x=2 then writeln(A/8000,' кб.')
else if x=3 then writeln(A/8000000,' мб.')
else if x=4 then writeln(A/8000000000,' гб.')
else writeln('Ошибка');
end.
PascalABC 3.4.2
a, b, c, d, e, f, g, h, i, j, x, y: integer;
begin
write('введите 10 чисел: ');
read(a, b, c, d, e, f, g, h, i, j);
if a < 0 then y := y + 1 else x := x + 1;
if b < 0 then y := y + 1 else x := x + 1;
if c < 0 then y := y + 1 else x := x + 1;
if d < 0 then y := y + 1 else x := x + 1;
if e < 0 then y := y + 1 else x := x + 1;
if f < 0 then y := y + 1 else x := x + 1;
if g < 0 then y := y + 1 else x := x + 1;
if h < 0 then y := y + 1 else x := x + 1;
if i < 0 then y := y + 1 else x := x + 1;
if j < 0 then y := y + 1 else x := x + 1;
writeln('количество положительных чисел: ', x);
writeln('количество отрицательных чисел: ', y);
end.