Створити програму, яка при введенні суми поповнення рахунку визначить тарифний план, який Ви можете придбати та виведе кількість наданих Вам хвилин, sms та ГБ інтернету. Визначить Ваш залишок (різницю між вартістю тарифного плану і станом рахунку) і покаже, скільки додаткових хвилин та ГБ Ви зможете замовити на залишок.
А: = 'ЭЛЕКТРОСТАНЦИЯ';
WRITELN (COPY (А, 2, 3) + COPY (A, 12, 3) ); ?
ЛЕКЦИЯ
2. Определите результат выполнения:
С: = ' ЛЕФОРТОВО' ;
F: = LENGTH (С) + LENGTH (С); ?
Две длины слова, т.е. 9+9=18
3. Из слова ИНФОРМАТИКА получено слово ФОРМАТ. Вставьте пропущенные значения
COPY('ИНФОРМАТИКА',3,6).
Надо взять, начиная с третьего символа, шесть символов.
4. Что будет выведено в результате выполнения:
WRITELN ('24 + 24 =', 24 + 24)?
24 + 24 =48
5. Что будет выведено в результате выполнения:
А: = 'ЭЛЕКТРОСТАНЦИЯ';
WRITELN(COPY(A,1,7)); ?
ЭЛЕКТРО
А: = 'ЭЛЕКТРОСТАНЦИЯ';
WRITELN (COPY (А, 2, 3) + COPY (A, 12, 3) ); ?
ЛЕКЦИЯ
Определите результат выполнения:
С: = ' ЛЕФОРТОВО' ;
F: = LENGTH (С) + LENGTH (С); ?
Переменной F присвоит значение 20
Из слова ИНФОРМАТИКА получено слово ФОРМАТ. Вставьте пропущенные значения
COPY('ИНФОРМАТИКА', ,).
COPY('ИНФОРМАТИКА',3 ,6)
Что будет выведено в результате выполнения:
WRITELN ('24 + 24 =', 24 + 24)?
24 + 24 =48
Что будет выведено в результате выполнения:
А: = 'ЭЛЕКТРОСТАНЦИЯ';
WRITELN(COPY(A,1,7));
ЭЛЕКТРО