Нужно составить програмку, чтоб решить пример: 39*54-84 в квадрате. Program product; var a,b,c:integer;
5-9 класс
|
a:=39*54-sqr(84));
readln
end.
Напишите ошибку, ну и объясните, если не сложно)
Program product;
var a,b,c:integer;
Begin
a:=39*54-sqr(84);
writeln(a);
end.
Вывод отстутсвует, отсутствует начало программы 'Begin'
Program product;
uses crt;
var a,b,c:integer;
clrscr;
Begin
a:=39*54-sqr(84);
writeln(a);
readkey;
end
Другие вопросы из категории
Читайте также
нужно составить программы, чтобы из слова перестройка получить 10 новых слов!
ребята, плиииз(
такого: var a,b,c:(integer)-целые; l,k,n:(real)-вещественные), найти сумму первых двух чисел, частное второго и третьего числа и утроить сумму трёх чисел. мне нужно составить программу дальше я знаю только начало: program ur1; var a,b,c:integer; l,k,n:real; begin и всё я дальше не могу сделать, помогите полажуйста чем можете!
x:=2;
у:=5;
х:=у;
у:=х;
2. Какую задачу решает данная программа?
program primer
var a,b,c: integer;
begin
writeln("введите двухзначное число ");
readln(a);
b:=a div 10 ;
c:=a mod 10;
write(c*10+b);
end.
а)находит сумму цифр числа;
б)вычесляет целую часть и остаток от деления числа на 10 ;
в)меняет цифры числа местами
г)находит цифры числа, а на экран выводит само число
3. Среди предложенных выражения выбирете логические :
а) (x=3)or (x<>4)
б)2*x+5;
в)x mod 2=0;
г)x div 3
д) x+у=10
е) х+у
ж)(х+у>5)or(x-у>5)
з)(х>3)and (х<=10)
4. Составьте условие для условного оператора в программе , которая выводит на экран приветствие в зависимости от времени суток . Пусть утро с8 до 12 ч, день с12 до 17 ч , вечер с 17 до 23ч, ночь-всё остальное время.
program primer;
begin
writeln("Который час?");
readln(x);
if__________then writeln('Доброе утро!');if__________then writeln('Добрый день!');
if__________then writeln('Добрый вечер!');
if__________then writeln('Доброй ночи!");
if__________then writeln('Введите число выходит за рамки интервала [0,24]');
p>
writeln(C)
end.
C:(A+B)*(B-A)
writeln(C)
end.
Задача связана с программой паскаль.