Вопрос по информатике:
Составьте блок-схему и программу для решения следующей задачи. Введите с клавиатуры два числа: к и л. Если они положительны, то замените каждое на квадрат их суммы и выведите результаты на экран. Если все числа отрицательны, то каждое сделайте равным наименьшему и выведите результаты. Иначе, К приравняйте к 10, а Л - к 15 и выведите результаты
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 04.07.2017 20:13
- Информатика
- remove_red_eye 2401
- thumb_up 62
Ответы и объяснения 2
procedure Algorithm;
var к,л: integer;
begin
Readln(к,л);
if к>0 and л>0 then
к := (к+л)^2;
л := к;
else
if к<0 and л<0 then
if к<л then
л := к;
else
к := л;
else
к := 10;
л := 15;
end.
- 05.07.2017 10:31
- thumb_up 59
блок схема во вложении, надо перерисовать аккуратнее, вот сама задача на паскале:
соственно код, протестирован на паскале:
program znz;
uses crt;
var k,l, kvsum:real;
begin
clrscr;
write('Input l:');
readln(l);
write('Input k:');
readln(k);
if(k>0) and (l>0) then
begin
kvsum:=k*k+l*l;
k:=kvsum;
l:=kvsum;
end
else
begin
if(k<0) and (l<0) then
begin
if(k
else
begin
k:=10;
l:=15;
end;
end;
writeln('k=',k:0:2);
writeln('l=',l:0:2);
readln;
end.
- 06.07.2017 21:57
- thumb_up 72
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.