В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
ksenijasadovsa13
ksenijasadovsa13
20.05.2020 16:53 •  Информатика

Почему при составлении вс алгоритма нужно четко определить начальное и конечное положения исполнителя?

Показать ответ
Ответ:
сончикпоня15
сончикпоня15
10.04.2020 12:10
1) Точность вычисления в программе не задается. Указано только количество цифр дробной части (3), которое требуется вывести на экран.
var x,y,a:real;
begin
write('x = ');
readln(x);
write('y = ');
readln(y);
if x*x-x-4>=0 then
 begin
 a:=((x*y)/(x+y))/(1+sqrt(x*x-x-4));
 writeln('a = ',a:5:3);
 end
 else writeln('Корень из отрицательного числа');
end.

2)
var a,b,c,d:real;
begin
writeln('Введите a, b, c, d:');
readln(a,b,c,d);
if (a=d)
 then if (c=b) then writeln('Бесконечно много решений')
               else writeln('Решения нет')
 else writeln('x = ',(c-b)/(a-d));
end.

Пример:
Введите a, b, c, d:
2 1 4 3
x = -3
0,0(0 оценок)
Ответ:
lerafilippovа04
lerafilippovа04
28.08.2020 02:46
На PascalABC.NET


program aaa;
const n=50;
var w, c, x, d10, d4, d1: integer; 
begin 
  writeln ('Введите вес бандероли');
  readln (w);
  if w <= n
    then c:=10
    else  
       if w mod n = 0
          then c:=10+((w div n)-1)*5
          else c:=10+5+((w div n)-1)*5;
 
  d10:= c div 10;
  d4:= (c-10*d10) div 4;
  d1:= (c-d10*10-d4*4);
 
  writeln ('стоимость бандероли: ',c,' драхм');
  writeln;
  writeln ('для оплаты нужно не менее');
  writeln (d10:10,' монет по 10 драхм');
  writeln (d4:10,' монет по 4 драхмы');
  writeln (d1:10,' монет по 1 драхме');
end.    


Результат работы программы:

Введите вес бандероли     100

стоимость бандероли: 15 драхм

для оплаты нужно не менее
          1 монет по 10 драхм
          1 монет по 4 драхмы
          1 монет по 1 драхме
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота