Предмет: Информатика, автор: ANNTII

Помогите пожалуйста составить программу!

Приложения:

Ответы

Автор ответа: vladmor
0
var
  a, b: integer;

begin
  write('введите a,b ');
  readln(a, b);
  if ((a + b) > 0) and ((a + b) mod 10 = 3) then
    writeln((a + b) * 2)
  else
    writeln(a + b);
end.

Тест №1
введите a,b 10 3
26

Тест №2
введите a,b 5 6
11


Автор ответа: ANNTII
0
Спасибо вам огромное!
Автор ответа: vladmor
0
Пожалуйста, успехов!
Похожие вопросы