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

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

Задать свой вопрос
1 ответ
Var
  a, b: integer;

begin
  write('введите a,b ');
  readln(a, b);
  if ((a + b) gt; 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


Вадик Насенков
Спасибо для вас огромное!
Тимур
Пожалуйста, фурроров!
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт