Program b;
var
bal:integer;
stip:real;
begin
write('Введите средний балл учащегося: ');
write('Введите стандартную стипендию: ');
readln(bal,stip);
if bal>=4 then stip:=stip+(stip/2) else
stip:=stip;
writeln('Стипендия учащегося: ',stip);
readln;
<span>end.
Как я понял по условию, нужно посчитать стипендию у различных учеников...</span>
Ответ: 22
Объяснение: Умножаем кол-во раз сколько встречается буква в слове на количество символов сколько оно имеет (нули тоже считают)
Я решала сама и нигде не нашла ответа, если кто-нибудь сверится со мной было бы круто
Девушка потратила в магазине 1458.04 рубля
var
summ, c:integer;
begin
write('Введите число '); readln(c);
summ := c mod 10 + (c div 10) mod 10 + c div 100;
writeln('Сумма цифр числа ', c , ' равна ', summ);
end.
//Dev-C++ 5.11 (C)
#include <stdio.h>
int main(void)
{int x,y,xl,yl;
scanf("%d%d%d%d",&xl,&yl,&x,&y);
if((xl==x)||(yl=y))
printf("YES");
else
printf("NO");
return 0;}
Пример ввода:
4 4 4 2
Пример вывода:
YES