Arath
6 год назад
Составить программу на языке паскаль для вычисления Х процентов от числа С.
ОТВЕТЫ
Giashbak
Aug 2, 2019
Var
x, c:integer;
a:real;
begin
write(Введите число: );
readln(c);
write(Введите количество процентов: );
read(x);
writeln();
a:=c/100*x;
writeln(Ответ: ,x, от числа ,с, равно ,a);
end.
x, c:integer;
a:real;
begin
write(Введите число: );
readln(c);
write(Введите количество процентов: );
read(x);
writeln();
a:=c/100*x;
writeln(Ответ: ,x, от числа ,с, равно ,a);
end.
219
Смежные вопросы:
