Выбери программу, которая вычисляет длину гипотенузы.
Компьютер запрашивает стоимость одного килограмма конфет.
Пользователь вводит стоимость одного килограмма конфет, и компьютер выводит на экран:
Цена 0,5 кг. конфет равна … рублей
Цена 1 кг. конфет равна … рублей
Цена 1,5 кг. конфет равна … рублей
Цена 10 кг. конфет равна … рублей
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.
1. Дано действительное число – цена 1 кг конфет. Вывести стоимость 0,5; 1; 1,5 … 10 кг конфет. (Подсказка – используем цикл WHILE).
Программа должна иметь следующий вид:
Компьютер запрашивает стоимость одного килограмма конфет.
Пользователь вводит стоимость одного килограмма конфет, и компьютер выводит на экран:
Выберите программу которая вычисляет длину гипотенузы
Выбери программу, которая вычисляет длину гипотенузы.
var
m,x,h:real;
begin
writeln(\’Введи длины катетов m и x \’);
readln(m,x);
h:=sqrt(m*m+x*x);
writeln(\’h=\’,h:8:2);
readln;
end.
var
m,x,h:real;
begin
writeln(\’Введи длины катетов m и x \’);
readln(m,x);
h:=sqr(sqrt(m)+sqrt(x));
writeln(\’h=\’,c:8:2);
readln;
end.
var
m,x,h:real;
begin
writeln(\’Введи длины катетов m и x \’);
readln(m,x);
h:=m*m+x*x;
writeln(\’h=\’,c:8:2);
readln;
end.
Выбери программу, которая вычисляет длину гипотенузы.
var
b,x,p:real;
begin
writeln(‘Введи длины катетов b и x ‘);
readln(b,x);
p:=sqr(sqrt(b)+sqrt(x));
writeln(‘p=’,c:8:2);
readln;
end.
var
b,x,p:real;
begin
writeln(‘Введи длины катетов b и x ‘);
readln(b,x);
p:=sqrt(b*b+x*x);
writeln(‘p=’,p:8:2);
readln;
end.
var
b,x,p:real;
begin
writeln(‘Введи длины катетов b и x ‘);
readln(b,x);
p:=b*b+x*x;
writeln(‘p=’,c:8:2);
readln;
end.