Lebedeva1577
?>

Ошибка в pascal (встречен конец файла, а ожидался оператор) , что нужно дописать чтобы ошибка исчезла? функция: function sqrt1 (a, b, c: real): real; begin if (2 * a + b - c) < 0 then writeln (' complex number ') - проверка на комплексные числа else sqrt1: = sqrt(2 * a + b - c); end;

Информатика

Ответы

nsn-2012
Нужно что-то присвоить функции для случая, когда (2*a+b-c)<0
Например, так:
function sqrt1 (a, b, c: real): real;
begin
if (2 * a + b - c) < 0 then
begin writeln (' complex number '); sqrt1:=-1; end
else sqrt1:= sqrt(2 * a + b - c);
end;
kabinet17

ответ:Ну тут легко

Например можешь написать про Амёбу или про Бактерии

Объяснение:

1) Амёбы — род микроскопических одноклеточных простейших из семейства Amoebidae. У амёб неправильная, всё время меняющаяся форма из-за временных цитоплазматических выростов, называемых ложноножками или псевдоподиями, которые служат для передвижения и захвата пищи.

2)Протоплазма  — цитоплазма и ядро клетки. Иногда протоплазмой неправильно называют только цитоплазму. Живая протоплазма реагировать и отвечать на раздражение.  Термин «протоплазма» ввёл в 1839 году Ян Пуркине. До середины XIX века считалось, что это второстепенная часть клетки по сравнению с оболочкой. В XIX — начале XX века понятие протоплазмы использовалось широко, а в современной научной литературе почти не встречается.

3) Инфузо́рия-туфелька — вид инфузорий, одноклеточных организмов из группы альвеолят. Иногда инфузориями-туфельками называют и другие виды рода Paramecium. Встречаются в пресных водах. Своё название получила за постоянную форму тела, напоминающую подошву туфли.

dkvsadovoe

1) 100101₂

2) 45₁₀

3) 175₈

4) 335₁₀

Объяснение:

Для перевода числа из 10 системы счисления  в любую другую систему счисления надо нацело делить число на основание новой системы счисления (пока целая часть не станет равной 0) и записывать получившиеся остатки от деления. Число в новой системе счисления записывается в виде остатков деления, начиная с последнего

1) 37₁₀ → А₂

37/2 = 18 и остаток 1

18/2 = 9 и остаток 0

9/2 = 4 и остаток 1

4/2 = 2 и остаток 0

2/2 = 1 и остаток 0

1/2 = 0 и остаток 1

37₁₀ = 100101₂  

3) 125₁₀ → А₈

125/8 = 15 и остаток 5

15/8 = 1 и остаток 7

1/8 = 0 и остаток 1

125₁₀ = 175₈

Для перевода числа из любой системы счисления в 10 систему счисления используется развернутая запись числа - сумма произведений цифр числа на основание системы счисления числа в степени разряда цифры числа

2) 101101₂ → А₁₀

101101₂ = 1 * 2⁵ + 0 * 2⁴ + 1 * 2³ + 1 * 2² + 0 * 2¹ + 1 * 2⁰ = 32 + 0 + 8 + 4 + 0 + 1 = 45₁₀

4) 517₈ → А₁₀

517₈ =  = 5 * 8² + 1 * 8¹ + 7 * 8⁰ = 320 + 8 + 7 = 335₁₀

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Ошибка в pascal (встречен конец файла, а ожидался оператор) , что нужно дописать чтобы ошибка исчезла? функция: function sqrt1 (a, b, c: real): real; begin if (2 * a + b - c) < 0 then writeln (' complex number ') - проверка на комплексные числа else sqrt1: = sqrt(2 * a + b - c); end;
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

yfetyukov2
bsi771184
mariia39
savva-vika
isinyakin
Анатолий
Melnik Kaveshnikova1746
alisapavlushina
yelena
ТигранКалмыкова
Денис1619
semenovakotya577
Vello Olga
Melnik Kaveshnikova1746
ashybasaida-33