Дано натурально число. Определить произведение 2 и 3 цифры

0 голосов

Дано натурально число. Определить произведение 2 и 3 цифры


спросил от (47 баллов) в категории Информатика
2 Ответы
0 голосов
ответил от Архангел (150k баллов)
 
Лучший ответ

//PascalABC.NET
//Версия 3.3, сборка 1611 
begin
write('Введите число: ');
var a:=ReadInteger().ToString();
write('произведение 2 и 3 цифры: ',a[2].ToDigit()*a[3].ToDigit());
end.

оставил комментарий от (47 баллов)

А можно понятней написать? Начиная с var, просто я так не могу понять что к чему. И что это такое a[2].ToDigit()*a[3].ToDigit()?

оставил комментарий от Архангел (150k баллов)

вводим натуральное число, преобразуем в строку, берем 2 и 3 символы из получившейся строки(это есть 2 и 3 цифры введенного числа) затем переводим эти символы в цифры и перемножаем

оставил комментарий от Отличник (8.8k баллов)

Проще говоря, разница в наших программах лишь в выборе стороны отсчета, я считал номера с права, он с лева. Вы не указали язык программирования - ваша проблема.

0 голосов
ответил от Отличник (8.8k баллов)

// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
var n:=ReadInteger('n =') div 10;
Writeln(n mod 10 * (n div 10 mod 10));
end.
...