Вопрос по информатике:
Здравствуйте! Можете, пожалуйста, написать текст данной задачи на языке Pascal, заранее благодарен!
Вот если что начало:
Type Anketa = RecordNomer:string[10];Summa:string[6];Vid:string[2];end;Var G:Array[1..3] of Anketa;I:byte;Otvet:string[6];Beginfor i:=1 to 3 dobeginWrite('Введите номер счёта: ');Readln(G[i].Nomer);Write('Введите сумму: ');Readln(G[i].summa);Write('Введите вид операции(снятие/пополнение): ');Readln(G[i].vid);end;Writeln('Информация о состоянии счёта');Write('Введите номер счёта, состояние которого надо посмотреть: ');readln(otvet); For i:=1 to 3 do
- 21.06.2018 00:28
- Информатика
- remove_red_eye 6254
- thumb_up 19
Ответы и объяснения 1
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.