Есть ответ 👍

1.записать на языке паскаль выражение: | x² - 20 | / cos y + 5x √y 2.чему равны значения переменных t и r после исполнения фрагмента программы: t : =1 if r > 10then r: =r+1; t: =8; a) (1,56) при r = 17; б) (2б) при r = 9. 3.сколько раз выполнится цикл и что будет на экране после исполнения фрагмента программы. for i: = - 10 to - 9 do begin k: =i; write(k); end. 4.магазин установил скидки покупателям за сумму покупок: от 5 тысяч руб. - 0.5 % от 10 тысяч руб. - 2 %,начиная от 20 тысяч руб. - 5 % сяч з а) составить программу,которая для введенного целого числа ( количества тысяч за покупку) выводит на экран процент скидки. б) составить программу,которая для 10 введенных с клавиатуры чисел (количества тысяч руб. за покупку 10 покупателей) выводит на экран процент скидки до каждого.

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

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

anyanice7
4,7(54 оценок)

1)abs(x*x - 20) / cos(y) + 5*x*sqrt(y) 2) t : =1 if r > 10then r: =r+1; t: =8; a) при r=17 условие выполняется, значит r увеличится на единицу.команды не связаны операторными скобками (begin r: =r+1; t: =8; end),поэтому t: =8; выполнится безусловно.r=18;   t=8; б)при r = 9 условие не выполняется, поэтому значение r останется неизменным.r = 9;   t = 8; 3) for i: = - 10 to - 9 do begin k: =i; write(k); end.цикл for не выполнится ни разу. на экран не будет выведено ничего.цикл "for i: = a to b do" выполняется b-a+1 раз, при условии, что b> =a.в нём значение i меняется от a до b, с каждой итерацией прибавляется единица.цикл "for i: = a downto b do" выполнится a-b+1 раз, при условии, что a> =bв нём значение i тоже меняется от a до b, но с каждой итерацией от i отнимается единица.4)а)vara: integer; beginwrite('введите сумму покупок: '); readln(a); if a< 5 then write('скидка не предоставляется')else if (a> =5)and(a< 10) then write('скидка: 0.5%')        else if (a> =10)and(a< 20) then write('скидка: 2%')                  else write('скидка: 5%')end.б) var a,i: integer; begin for i: = 1 to 10 do begin write('введите сумму покупок: '); readln(a); if a< 5 then writeln('скидка не предоставляется') else if (a> =5)and(a< 10) then writeln('скидка: 0.5%')         else if (a> =10)and(a< 20) then writeln('скидка: 2%')                   else writeln('скидка: 5%') end end.

Сэ уэ фыуэ узолъагъу. буквально "я тебя хорошо вижу", но употребляется именно в смысле "я тебя люблю". 

Популярно: Информатика