
Ishnfyn
5 год назад
35 поинтов, 1-ЫЙ ОТВЕТ ЛУЧШИЙ! Напишите пожалуйста программу на языке Paskal,с пояснениями к действиям. В информатике более-менее разбираюсь, поэтому объяснение совсем "для чайников" не нужно. Осталось слишком мало уроков, физически не успеваю во время занятий, а задачу не понимаю.

ОТВЕТЫ

Beltz Regina
Oct 24, 2020
var x,y : real;
begin
write('x = '); readln(x);
write('y = '); readln(y);
if (y>=3)and(x<=2)and(y<=4*x+3)
then writeln('Да')
else writeln('Нет');
end.
Пример:
x = 1
y = 4
Да
begin
write('x = '); readln(x);
write('y = '); readln(y);
if (y>=3)and(x<=2)and(y<=4*x+3)
then writeln('Да')
else writeln('Нет');
end.
Пример:
x = 1
y = 4
Да
863
Смежные вопросы: