Program chik;
var y,x:real;
begin
x:=-11;
while x<10 do
begin
x:=x+1;
if(x<>0)then y:=1/(x*x) else y:=-1;
if(y<>-1)then writeln(y) else writeln('при x=0 нет решений');
end;
end.

0 0

4 года назад

Решите пожалуйста даю 39 баллов

Энесса [5]

Извини, второй лист решать - это много. Здесь итак 9 примеров было.

0 0

4 года назад

Переведите шестнадцатеричные цифры в 2 и 8 в систему очисления 190 и (маленькими цифрами написано 16)

Lissska [31]

190 в 16 = 110010000 во 2
190 в 16 = <span>620 </span>в 8

Если я правильно понял задание, то решение сделано верно.

0 0

4 года назад

Определите типы данных в характеристиках автомобиля

Евгений175 [1.4K]

Строковый
Вещественный
Логический
Целый
Целый

0 0

4 года назад