1. неверно построен раздел переменных 2. имя программы написано неправильно 3. использованы неверные ограничители текстовых частей 3). program Prim_2_1; begin readln(a,b,c); p:=(a+b+c)*2; writeln(‘p=’,p); end. 1. отсутствует раздел переменных 2. отсутствует ввод данных 3. неверная запись оператора присваивания 4). var a,b: integer; begin writeln(‘Введите 5 численных значений:’); p:=a+b+c+d+f; writeln(‘p=’,p); end.
1. неверно сделано описание переменных 2. отсутствует ввод переменных 3. отсутствуют вывод данных 5). program Prim_2_1; var a,b,c: integer; begin writeln(‘Введите 2 численных значения:’); readln(a,b,c); с:=a/b; writeln(‘c=’,c); end. 1. неверно описан тип данных 2. отсутствуют вычисления в программе 3. ошибка в записи оператора присваивания. 6). var a,b,c,d,f,p: integer; begin writeln(‘Введите 5 численных значений:’); readln(a,b,c,d,f); writeln(‘p=’,p); end.
1. отсутствует команда завершения программы 2 отсутствует команда начала программы 3. отсутствуют вычисления в программе 7). var a,b,c: integer; writeln(‘Введите 2 численных значения:’); readln(a,b); с:=a div b; writeln(‘c=’,c); end. 1. отсутствует команда начала программы 2. допущена ошибка в операторе присваивания 3. отсутствует команда завершения программы 8). var a,b,c: integer; d: real; begin writeln(‘Введите 3 численных значения:’); readln(a,b,c); d:=(a+b+c)/2; writeln(‘d=’,d); end.
1. допущена ошибка в блоке описания переменных 2. использованы неверные разделители в записи оператора ввода данных. 3. отсутствует имя программы. 9).
В результате выполнения программы при вводе чисел 4, 6, 7 (порядок перечисления данных соответствует порядку перечисления вводимых переменных) на экран выводится: var a,b,c: integer; begin writeln(‘Введите 3 численных значения:’); readln(a,b,c); p:=((a+b) mod 2)+c; writeln(‘p=’,p); end. 1. число 12 2. число 7 3. число 8 10). Следующий алгоритм в результате выполнения программы находит значение выражения: var x: integer; y: real; begin writeln(‘Введите x:’); readln(x); y:=(15*sgr(x)*x+x mod 6-29)/2; writeln(‘y=’,y); end. 1. y=(15x+x/6-29)/2 2. y=(15×3+(целая часть от деления x на 6)-29)/2 3. y=(5×3+(остаток от деления числа x на 6)-29)/2
2. использованы неверные разделители в записи оператора ввода данных.
Линейная программа с ветвлением
3. отсутствует имя программы.
В результате выполнения программы при вводе чисел 4, 6, 7 (порядок перечисления данных соответствует порядку перечисления вводимых переменных) на экран выводится:
var a,b,c: integer;
writeln(‘Введите 3 численных значения:’);
Следующий алгоритм в результате выполнения программы находит значение выражения:
y:=(15*sgr(x)*x+x mod 6-29)/2;
2. y=(15×3+(целая часть от деления x на 6)-29)/2
3. y=(5×3+(остаток от деления числа x на 6)-29)/2
Ответ учителя по предмету Информатика
Ответ:
1)1. 2)3. 3)1. 4)1 и 2. 5)1. 6)3. 7)1. 8)3.
9)2. 10)3.
Источник: ded-otvet.ru
PASCAL. Урок 2. Вывод (read/readln). типы данных(integer, real), переменные. ПАСКАЛЬ
Сколько ошибок допущено в программе program zadacha var a integer begin writeln введите целое число
Помогите пожалуйста. Я составила программу по задаче(внизу), но у меня проблема, после ввода Баллов за экзамены и ФИО(по задаче) она ничего больше не выводит, хотя там дальше идут действия. Мне сказали что в программе чего то не хватает, но до меня дойти не может чего. Если не сложно подскажите что мне нужно дописать.
program zadacha60; var a:string; a1:array[1..1000] of string; i:array[1..100] of integer; n,b,c,d:integer; begin writeln (‘ФИО’); read(a); writeln (‘Баллы по математике’); read(b); writeln (‘Баллы по русскому языку’); read (c); writeln (‘Баллы по информатике’); read(d); begin if (i[b]>=100) and (i[c]>=100) and (i[d]>=100) then begin n:=i[b]+i[c]+i[d]; end; end; begin if (n>=180) and (n>=250) then writeln (a, ‘-‘ , n , ‘ ,зачислен ,стипендия есть ‘) else writeln (‘Не зачислен’); end; end.
Пожалуйста, оформляйте Ваш код согласно правилам .
Задача: Известны фамилии абитуриентов и их результаты ЕГЭ по рус.яз, матем., информ.(результаты за каждый экзамен от 0 до 100)
а) определить кто из студентов зачислен в институт, , если проходной балл 180
б)вывести фамилии тех кто будет получать стипендию(суммарный балл от 250)
Последний раз редактировалось Вадим Мошев; 19.10.2017 в 19:02 .
Источник: www.programmersforum.ru
Сколько ошибок допущено в программе program zadacha var a integer begin writeln введите целое число
petyaGavrikov 7 лет назад
Светило науки — 5869 ответов — 21974 помощи
Надо бы указывать — какой используется компилятор. Вариант программы, который должен работать со всеми версиями паскаля:
program Prog;
var A, B, C: integer;
begin
readln (A, B);
C := A * B;
writeln (‘Произведение введенных Вами чисел равно ‘, C);
end.
m0nclous 7 лет назад
Светило науки — 285 ответов — 5344 помощи
Строчка «program Умножение;» спорная т.к. некоторые компиляторы поддерживают кириллицу, например PascalABC, но лучше использовать английские буквы.
«var A, B, C: boolean;» boolean — это логический тип переменных True False, либо 0 1, для других чисел не подходит. Я остановился на типе «real», чтобы можно было вводить не только целые числа, но и дробные, например 2,5
После каждого оператора необходимо ставить «;», кроме того, что перед «end» там ставить не обязательно.
В паскале «=» используется как оператор сравнения, а оператор присваивания выглядит так: «: C = A * B»
Текст в «writeln()» пишется в одинарных кавычках, исправляем ошибку » writeln (Произведение введенных Вами чисел равно , C)»
И так вот готовая исправленная программа
Program multi;
Var A,B,C:real;
Begin
Read(A,B);
C:=A*B;
Writeln(‘Произведение введенных Вами чисел равно ‘,C)
End.
Источник: znanija.pro