ответ: 2 ВАРИАНТ)
var
x:real;
begin
x:=(32+45)/(2+7);
writeln('x=',x:4:2);
readln;
end.
Объяснение:
1 ВАРИАНТ)
var
x:char;
begin
x:=(32+45)/(2+7);
writeln('x=',x:4:2);
readln;
end.
НЕ ПОДХОДИТ, Т.К. для x указан тип данных - символьный. var x:char;
2 ВАРИАНТ)
var
x:real;
begin
x:=(32+45)/(2+7);
writeln('x=',x:4:2);
readln;
end.
ПОДХОДИТ, Т.К. всё верно.
3 ВАРИАНТ)
var
x:real;
begin
x:=(32+45)/(2+7);
end.
НЕ ПОДХОДИТ, Т.К. программа не делает вывод ответа.
4 ВАРИАНТ)
var
x:real;
begin
x:=(32+45)*(2+7);
writeln('x=',x:4:2);
readln;
end.
НЕ ПОДХОДИТ, Т.К. допущена ошибка при записи уравнения. Указано умножение, вместо деления (32+45) * (2+7)
для машин информатики. оформите программу на неизвестном языке программирования, обеспечивающую: - заполнение одномерного массива в с клавиатуры n вещественными значениями; - за минимальное число проходов по массиву в без использования дополнительных массивов последовательное (а-б-в-г) заполнение одномерного массива z значениями элементов массива в в указанном порядке их сходного расположения в массиве в а) сначала неотрицательные элементы на чётных позициях в исходном порядке б) потом неотрицательные элементы на нечётных позициях в порядке, обратном исходному в) затем отрицательные элементы на четных позициях в порядке, обратном исходному с) потом отрицательные элементы на нечётных позициях в исходном порядке -вывод элементов массива z
по введенному натуральному числу n(n<=100) обозначаешему количество ворон вывести надпись ,на дереве n ворон.где ворона склоняеться соответсвено n:'ворон'.'ворона"вороны' в случаем n превышаюшего 100 вывести надпись 'ветка обламилась'
uses crt;var n:integer;
begin
clrscr;
repeat
write('Введите число от 1 до 100 N = ');
readln(n);
until n>0;
case n of
11..14:write('сидело ',n,' ворон');
1..10,15..100: case n mod 10 of
1:write('На дереве сидела ',n,' ворона');
2..4:write('На дереве сидели ',n,' вороны');
0,5..9:write('На дереве сидело ',n,' ворон');
end
else write('Ветка обломилась!');
end;
readln;
end.