Задача в Pascal + Блок схема. Ввести с клавиатуры переменные х и у Если х положительное , у отрицательное, то найти и вывести на экран их удвоенное произведение.
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var x,y:integer;
begin
read(x);
read(y);
if x > 0 and y < 0 then
write(x*y*2);
end.
------------
число x > 0
/ \
/ \
/ \
да нет
/
/
-----------
y < 0 \
/ нет
/
/
да (вывести удвоенное)