Паскаль. линейный оператор. в магазине продается ткань для костюма. ее цена а грн. за кв. метр. напишите программу которая пошитывает и выводит на экран стоимасть куска этой ткани длинной х м. и шириной 80 см.

214

355

Посмотреть ответы 2

Ответы на вопрос:

ttleuberlin

Информатика

4,5(67 оценок)

Var a, x: real; begin write('стоимость 1 кв.м. ткани, грн: '); readln(a); write('длина куска ткани, м: '); readln(x); writeln('к оплате: ', a * x * 0.8,' грн.') end. тестовое решение: стоимость 1 кв.м. ткани, грн: 46.5 длина куска ткани, м: 2.6 к оплате: 96.72 грн.

катейка22

Информатика

4,4(1 оценок)

Const a = 0; b = 10; var x, y, h: real; begin h : = 0.5; x : = a; repeat y : = sin(x) / cos(x); writeln('x = ', x: 4: 1, ' y = ', y: 6: 3); x : = x + h; until x > b; end.