[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 2 из 2«12
Модератор форума: Сергеев_ЕВ 
Форум учителей » Форумы для учителей предметников » Форум учителей информатики » Samsusam (сегодня на уроке)
Samsusam
Сергеев_ЕВ Дата: Суббота, 05.01.2013, 22:35 | Сообщение #11
Профиль пользователя Сергеев_ЕВ
Модератор форума
Группа: Модераторы
Сообщений: 2898
Статус: Отсутствует
Цитата (Русаков)
Найти сумму цифр двузначного числа
m:=x mod 10; (разряд единиц)
n:=x div 10; (разряд десятков)
s:=m+n;
О, неувядаемый Pascal...
Цитата (Тупые герои рекламных роликов)

- Папа! А на Pascal'е сейчас кто-то программирует?
- Нет, сынок, это фантастика...


Можно сократить количество строк кода и выделение памяти под переменные, выведя в последней строке вместо переменных m и n их выражения:
s:= x mod 10 + x div 10

А вообще, берите PascalABC и не парьтесь: практических заданий (типа Робот или Чертежник) на четверть хватит точно! А для шибко резвых деток сразу ставьте PascalABC.NET - там заданий больше




Окажу помощь в создании и администрировании учительских сайтов в системе uCoz
Форум учителей » Форумы для учителей предметников » Форум учителей информатики » Samsusam (сегодня на уроке)
Страница 2 из 2«12
Поиск:

Если Вы хотите оставить сообщение на форуме,
то рекомендуем Вам зарегистрироваться на нашем сайте или войти на портал как зарегистрированный пользователь